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VORWORT 


Die Anwendungsmöglichkeiten des Taschencomputers HP-41 sind in den 
letzten Jahren entscheidend erweitert worden. Dadurch ist ein komplexes 
Taschencomputersystem entstanden, das im Laufe der Zeit viele Anhänger 
gefunden hat. 


Die Vorzüge des HP-41 gegenüber Personal-Computern liegen auch heute 
noch in seiner Kompaktheit und in seinem Permanentspeicher. Er ist wirk- 
lich überall sofort einsetzbar. Hinzu kommt die vielseitige Möglichkeit 
individueller Systemerweiterungen. 


Dieses Buch stellt Methoden der fortschrittlichen Programmierung des 
HP-41 vor. Es werden 51 vollständige Programme und Routinen in 
Funktion, Aufbau und Anwendung dargestellt. Anhand allgemein ver- 
ständlicher Programme werden die verschiedenen Techniken zur Pro- 
grammoptimierung aufgezeigt. 


Besonders die intensive Nutzung des X-Functions Moduls und der 
synthetischen Programmierung werden an vielen Programmbeispielen 
ausführlich erläutert. 


Die Grundlagen der synthetischen Programmierung, "Load Bytes" und 
"Key Assignment" werden als besonders kurze Programme vorgestellt. 
Anwendungen und sinnvoller Nutzen synthetischer Programmierung werden 
an einfachen und komplexen Programmbeispielen schrittweise verständlich 
gemacht. 


Mit den Programmbeschreibungen bietet das Buch dem Benutzer des HP-41 


eine Fülle wertvoller Anregungen, um die Möglichkeiten seines Taschen- 
computers optimal zu nutzen. 


Aachen, im August 1984 Gerhard Kruse 
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1 STACKREGISTER ODER DATENREGISTER ? 


Die optimale Nutzung des Speicherplatzes durch den intensiven Gebrauch 
der Stackregister soll in diesem Kapitel an einigen Beispielen deutlich 
gemacht werden. 


Es ist eine wesentliche Aufgabe des Programmierers, den im Rechner vor- 
handenen Speicherplatz möglichst optimal auszunutzen. Wie weit man den 
Rechner auch durch zusätzliche Speichermodule erweitert, der vorhandene 
Speicherplatz bleibt doch immer begrenzt. Besonders in der neuesten 
Version des HP-41, im HP-41 CX, ist der Speicherplatz, gemessen an der 
Rechnergröße, recht bemerkenswert. Trotzdem sollte man nicht ver- 
schwenderisch damit umgehen. 


1.1 "SQRT" - Babylonisches Wurzelziehen 


Nach der Methode des "babylonischen Wurzelziehens" ist es möglich, nur 
mit Hilfe der Grundrechenarten Division und Addition die Quadratwurzel 
aus einer positiven Zahl zu ziehen. Dabei wird die folgende Formel ver- 
wandt: 


1 A 
W=— x (W+-—) Bi*+LBL "SUR 
2 w' Be 
BZ 8207 
A ist die Zahl, aus der die Wurzel gezogen - ao 26 
werden soll. W' der erste Näherungswert für 85 STO ei 
die Wurzel und W der zweite Näherungswert, 
der sich aus dem ersten ergibt. Diese 86+LBL 85 
Rechenformel wird immer wieder ausgeführt, 87 RCL 80 
bis W der Quadratwurzel von A soweit ange- an ELL Wl 
nähert ist, daß die Differenz vernachlässigt Ne 
r 18 RCEL 81 
werden kann. 11 + 
12 2 
Für diese Wurzelberechnung durch Iteration 13 + 
ist der HP-41 bestens geeignet: Das Pro- 14 ENTERT 
gramm "SQRT" benötigt zwei Datenregister 15 8<> 01 
j s 16 %3=Y? 
und belegt 29 Bytes. Da jedes Datenregister 1? CTO 68 
7 Bytes belegt, ist der gesamte Platzbedarf 18 END 
des Programms 43 Bytes. 
LEL"SORT 
EHD 


29 BYTES 


Das Programm speichert A in Register 00 und W' in Register 01. Als 
erster Näherungswert wird A angenommen (Zeile 05). Die Annahme des 
ersten Näherungswertes ist ein entscheidender Punkt bei Iterationsauf- 
gaben. Die erste Annahme kann die Rechenzeit sehr entscheidend beein- 
flussen oder die Berechnung sogar unmöglich machen. Für das hier be- 
handelte Beispiel ist das jedoch nicht von Bedeutung. In den Zeilen 07 
bis 13 wird die eigentliche Formelberechnung durchgeführt. Zeile 15 
tauscht dann W gegen W' aus. In Zeile 16 wird verglichen, ob W' (im 
X-Register) ungleich W (im Y-Register) ist. Ist das der Fall, wird die 
Formel, beginnend mit Zeile 07, nochmals berechnet. Ist W nicht mehr 
ungleich W', wird die Berechnung nicht weiter fortgesetzt. 


Nach dieser Iterationsmethode könnten W und W' eigentlich niemals wirk- 
lich gleich werden. Daß dies dennoch der Fall ist (das Programm läuft ja 
nicht endlos weiter!), liegt allein daran, daß der Rechner nur mit einer 
endlichen Stellenzahl rechnet; sobald diese Stellen identisch sind, wird W 
"gleich"! W'. Die Zeilen 02 und 03 sind erforderlich, da die Formel nur für 
positive A gültig ist; falls ein negativer Wert eingegeben wurde, stoppt 
das Programm in Zeile 09 mit 'DATA ERROR'. Nun kann man die Funktion 
des Programms mit beliebigen positiven Werten testen. Natürlich ist das 
Programm von der Aufgabenstellung her betrachtet nicht erforderlich, da 
der Rechner eine Quadratwurzelfunktion besitzt. Aber gerade das Pro- 
grammbeispiel kann sehr viel anschaulich machen. Das gilt besonders bei 
Vergleich mit der nächsten Programmversion: 


Das Programm "SQRT" belegt jetzt 31 Bytes, 


B1l+LBL "SUR aber es werden keine Datenregister mehr be- 
Ed nutzt. Also sind etwa 28 % des ursprüngli- 
82 x<8? chen Speicherplatzes eingespart worden. 
B3 CL* 
: En Er Betrachtet man zunächst nur die Formel- 
schleife, Zeile 07 bis 14, und läßt dabei die 
B86*+LBL 88 Zeilen 08 und 09 unbeachtet, gilt: Vor der 
87 RDN Ausführung der Division ist A im Y-Register 
25 BULL Y und W' im X-Register (Zeile 10). W' bleibt 
. BER nach der Division und auch nach der 


11 LASTX Addition (Zeile 10 und Zeile 12) im LastX- 


12 + Register. Aber warum nicht die Division 
13 2 durch 2 mit 2, / ? Hier wird die Stack- 
14 ST- Y Register-Rechnung 2, ST/ Y verwandt, 
15 xs> L damit W' für den Vergleich (Zeile 16) und 
16 a=Y? für die späteren Rechnungen im LastX- 


iv. aTH Bm Register erhalten bleibt. Die Zeilen 08 und 


15 END 
09 haben die Aufgabe, den Wert A zu er- 
LBEL’SGFT halten, der sonst bei der Division verloren 
EHD ginge. 


21 BYTES 


Die zweite Programmversion macht Stackbewegungen und Stackrechnungen 


anschaulich. Man kann das Programm mit SST 
führen, um das zu beobachten. Will man die einzelnen 


in Einzelschritten aus- 
Iterationsschritte 


sichtbar machen, ist vor dem Vergleich (Zeile 16) VIEW X oder PSE ein- 
zufügen. Dann ist zu erkennen, daß der erste Näherungswert A ist. 


1.2 "PYT" - Pythagoräische Zahlentripel 


Das hier aufgelistete Programm "PYT'" be- 
rechnet sogenannte pythagoräische Zahlen- 
tripel. Das sind ganzzahlige Seitenlängen 
eines rechtwinkligen Dreiecks. Es werden 
zwei Programmversionen gegenübergestellt: 
65 Bytes, SIZE 002 und 72 Bytes, SIZE 000. 
Für beide Programme sollte FIX 0 eingestellt 
werden. Dann ist eine positive ganze Zahl 
(größer als 1) einzugeben, und das Pro- 
gramm kann gestartet werden. 


Es läuft solange, bis es mit R/S angehalten 
wird. Für eine längere Programmlaufzeit ist 
es ratsam, die Zeilen FS? 49, OFF einzu- 
fügen, damit der Rechner bei Erschöpfung 
der Batterien nicht seine Speicherinhalte 
verliert. Diese Einfügung sollte sinnvoller- 
weise im dritten Programmabschnitt (LBL 02) 
erfolgen, damit die Programmlaufzeit nicht 
übermäßig verlängert wird. 


Die einzugebende Startzahl ist eine Kathete 
des rechtwinkligen Dreiecks. Im ersten 
Programmabschnitt (LBL 00) wird die maxi- 
male Größe der zweiten Kathete berechnet. 
Im zweiten Programmabschnitt (LBL 01) wird 
getestet, ob die Hypothenuse ganzzahlig ist. 
Dazu wird die erste Kathete mit der Größe 
der eingegebenen Startzahl und die zweite 
Kathete um 1 größer als die Startzahl an- 
genommen. Die zweite Kathete wird an- 
schließend bis zum vorher errechneten 
Maximalwert jeweils um 1 erhöht. Die 
ISG-Befehle dienen dazu, die Kathetengröße 
jeweils um 1 zu erhöhen (Zeilen 17 und 29). 
Die anschließende Zeile (CLD) wird immer 
übersprungen. Dort kann also in diesem 
Falle jeder beliebige Befehl stehen. 


al+LBL 
e2 STO 


B3+LBL 


18 FRC 
11 LAST 
12 * 

13 x%=6? 
14 LAST 
15 INT 


16*+LBL 
17 ISG 
18 CLD 


LBL'’PYT 
END 
85 BYTES 


"PYT 
88 


% 
” 


81 
81 


8 
81 


Gil+LBL "PWYT 


82*+LBL 66 


ENTERT 
ENTERt 
xt2 
DSE *& 
2 


z 
v 


FRC 
LASTS 
a% 
“=? 
<> L 
INT 


15*+LBL 81 


RDN 
ISG #& 


35+LBL 62 


36 


LEL” 


END 


ARCL Z 
“Rz 

ARCL Y 
pn 
ARCL 
TONE 
AVYIEN 
END 


[13 0 gef 


PYT 


72 BYTES 


Um sicherzustellen, daß der Programmbefehl 
nach einem ISG-Befehl immer ausgeführt 
wird, fügt man zwischen den ISG-Befehl und 
den als nächsten vorgesehenen Programm- 
befehl einen sogenannten NOP ein. Dafür 
muß ein Befehl gewählt werden, der auch 
dann keine störende Wirkung hat, wenn er 
ausgeführt wird. 


Ist der maximale Wert der zweiten Kathete 
erreicht, wird die Startzahl um 1 erhöht, 
und das Programm beginnt von vorne (Zeilen 
29, 30, 31). 


Der dritte Programmabschnitt (LBL 02) stellt 
die Ergebnisausgabe dar. Die Zeile nach dem 
Label ist ein Leerschritt im Alpharegister 
(SPACE) und könnte auch durch CLA ersetzt 
werden. Da dieses Programm je nach einge- 
gebener Startzahl eventuell recht lange bis 
zu einer Ergebnisanzeige läuft, ist der Ton 
hier angebracht. (Beispiel: 89/3960/3961!) 


Da bei den beiden Programmen "PYT" der 
gesamte benötigte Speicherplatz fast gleich 
ist (65 Bytes + 14 Bytes = 79 Bytes bzw. 
72 Bytes), kommt hier noch ein weiterer 
Faktor hinzu, um eine Programmoptimierung 
zu beurteilen: Die Laufzeit! 


Da die Schleife zu Beginn des LBL 01 sehr 
oft durchlaufen werden muß, ist das 
Programm, das Datenregister benutzt, in 
diesem Fall deutlich optimaler, da es 
wesentlich schneller ist. Bei der Frage, ob 
man die Benutzung von Datenregistern oder 
Stackregistern bevorzugt, sollte man also 
besonders in Programmschleifen den 
Geschwindigkeitsaspekt mit berücksichtigen, 


1.3 "UZ" - Ulams Zahlenreihen 


Eine Freude für alle Freunde der Zahlen- 
spielerei ist das folgende Programm "UZ". Es 
beruht auf einer These von Stanislaw Ulam, 
die besagt, daß man von jeder positiven 
ganzen Zahl aus immer 1 erreicht, wenn man 
nach der folgenden Rechenregel vorgeht: 


- Ist die Zahl gerade, ist sie durch 2 zu 
teilen, 


- ist die Zahl ungerade, ist sie mit 3 zu 
multiplizieren und anschließend 1 zu 
addieren. 


Mit dem Ergebnis ist dann nach der gleichen 
Rechenregel fortzufahren, bis man schließlich 
1 erhält. Das Erstaunliche ist, daß man tat- 
sächlich immer I erhält, wenn auch oft auf 
großen Umwegen. 


Das Programm "UZ" belegt 69 Bytes und 
keine Datenregister. Die ersten Zeilen 
(Zeile 02 bis 09) dienen dazu, jede falsche 
Eingabe durch 'DATA ERROR' abzuweisen, 
Es dürfen nur ganze Zahlen größer als 1 
eingegeben werden. Diese Anforderung wird 
in vielen Programmen gestellt; z.B. bei 
Primzahlprogrammen oder auch bei dem 
vorigen Programmbeispiel "PYT". Die meisten 
dieser Programme würden bei fehlerhaften 
Eingaben in unendliche Programmschleifen 
laufen oder falsche Ergebnisse liefern. 
Deshalb ist eine Fehlerprüfung oft sinnvoll. 
Will man die Fehlerprüfung aus dem Pro- 
gramm herausnehmen, löscht man die 
Zeilen 02 bis 09 (einschließlich); statt dessen 
muß dann zweimal ENTER eingesetzt werden. 


Startet man das Programm "UZ" mit einer 
gültigen Eingabe, werden die einzelnen 
Rechenergebnisse der Reihe nach angezeigt 
(VIEW X, Zeile 16), bis 1 erreicht ist. Man 
kann auch den Drucker anschließen, um die 
Einzelergebnisse festzuhalten. Zum Schluß 
werden die Ausgangszahl und die Anzahl der 
Rechenzyklen angezeigt, die erforderlich 
waren, um 1 zu erreichen. 


B1+LBEL "U" 


13+LBL 898 
14 x=0? 
15 a<> L 
16 YIEW = 
17 15G %W 
18 CLD 

19 2 

28 %=Y? 
21 GTO 81 
22 + 

23 FRC 

24 x%=8? 
25 GTO 08 
26 %i> L 
27 6 

23 * 

23 1 

38 + 

31 GTO 08 


LBEL"UZ 
EHD 
&9 BYTES 


Beispiel 13: 13, 40, 20, 10, 5, 16, 8, 4, 2, 1 13...9 


Das Programm ist so aufgebaut, daß man nach der letzten Anzeige mit 
R/S sofort den nächsten Durchgang für die nächste Zahl starten kann (im 
Beispielfall also 14). 


Schon bei niedrigen Zahlen gibt es recht lange Reihen: 27, 31, 41. Will 
man nicht jedes einzelne Zwischenergebnis der Reihe, sondern nur die 
letzte Anzeige sehen, löscht man Zeile 34 und Zeile 16 (VIEW X). Zeile 35 
ist wieder ein Leerschritt im Alpharegister, der durch CLA ersetzt 
werden kann, Setzt man vor das END (Zeile 43) GTO "UZ", so läuft das 
Programm fortlaufend weiter. Man kann so mit dem Drucker für viele 
Zahlen feststellen, wie viele Rechenzyklen benötigt werden, um die Zahl 1 
zu erreichen. 


Erstaunlich dabei ist, wie oft es vorkommt, daß drei aufeinanderfolgende 
Zahlen genau die gleiche Anzahl von Rechenzyklen hervorbringen! 
Beispiele: 124,125,126; 

145,146,147; 

156,157,158; 

164,165,166 
oder auch kleinere: 28, 29, 30; 

36, 37, 38 

und auch sehr große: 1068,1069,1070; 

1028,1029,1030. 


An diesem Programm zeigt sich, daß Zahlenspielereien oft Überraschungen 
hervorbringen können. 


Wenn man die Anzahl der Rechenzyklien fortlaufend ermitteln möchte, 
sollte man natürlich auch die Zeilen 34 und 16 löschen; außerdem ist es 
schneller und kürzer, wenn man statt am Ende GTO "UZ" einzugeben, 
dort GTO 02 eingibt und an den Programmanfang zusätzlich LBL 02 setzt. 


Das Programm "UZ" enthält einige Passagen, an denen eine weitere 
Technik der Programmoptimierung verdeutlicht werden kann: Die Mehr- 
fachbenutzung einzelner Programmbefehle. 


Fast alle Programmbefehle des Rechners haben mehrere Auswirkungen, 
auch wenn man sich dessen nicht immer bewußt ist. Dies gilt besonders 
für die Stackregister. Gelingt es, in einem Programm mehrere Wirkungen 
eines Programmbefehls zu nutzen, wird das Programm dadurch wesentlich 
kürzer und schneller, 


Mit dem Befehl FRC in Zeile 23 kann man wegen der vorher erfolgten 
Division durch 2 zunächst einmal erkennen, ob eine gerade oder ungerade 
Zahl vorlag. Dies kann in Zeile 24 mit X = 0 ? erkannt werden. Als 
Nebeneffekt speichert aber FRC die ursprüngliche Zahl in das LastX- 
Register, so daß später, entweder in Zeile 26 oder in Zeile 15 mit dieser 
Zahl weitergerechnet werden kann. Hier werden also die Wirkungen des 
Befehls FRC doppelt genutzt. Der Befehl STO L sollte eigentlich in 
keinem Programm vorkommen. Er kann wie hier in den meisten Fällen 
durch einen anderen Befehl (INT, FRC, SIGN oder einen Rechenbefehl) 
ersetzt werden; dies gilt selbst dann, wenn die eigentliche Funktion des 
verwendeten Befehls gar nicht benötigt wird, dann spart man immerhin 
noch ein Byte. 


Die in Zeile 19 verwendete Zahl 2 wird sogar in dreifacher Hinsicht 
genutzt: Zunächst für die Entscheidung, ob die Zahlenreihe beendet wer- 
den kann, da die Zahl 2 erreicht worden ist und bei der nächsten 
Division durch 2 das Ergebnis 1 erreicht würde (X = Y ?, GTO 01); dann 
um zu erkennen, ob es sich um eine gerade oder ungerade Zahl handelt 
und schließlich noch für die weitere Berechnung. Eine gerade Zahl ist 
bereits durch 2 geteilt worden, eine ungerade Zahl müßte mit 3 
multipliziert werden, wird dann aber wegen der vorherigen Division 
durch 2 mit 6 multipliziert. 


Eine weitere Möglichkeit, die Nebenwirkungen eines Befehls zu nutzen, 
kann man in Zeile 05 und Zeile 09 (ASIN) sehen. Die Hauptwirkung des 
Befehls, die Berechnung des Arcussinus, ist in diesem Fall nicht beab- 
sichtigt. Vielmehr soll hier die Fehlermeldung 'DATA ERROR! erzeugt 
werden, um falsche Eingaben abzuweisen. Bei der Vielzahl der im Rechner 
enthaltenen Fehlermeldungen (besonders in Verbindung mit dem X-Func- 
tions Modul) kann mit Hilfe dieser Technik fast für jede Situation ein 
'passender' Fehlerhinweis programmiert werden. So erhält man wesentlich 
schnellere und kürzere Programme als mit einer selbst formulierten 
Fehlermeldung und dem anschließenden PROMPT-Befehl. Man sollte dabei 
aber nicht vergessen, daß die Verwendung eines Befehls ausschließlich 
zur Erzeugung eines Fehlerhinweises die Programmlesbarkeit eventuell 
erheblich erschwert. 


Damit ein Programm gut lesbar bleibt, sollte man für die zu überspringen- 
de Programmzeile im Anschluß an ISG oder DSE immer den gleichen Pro- 
grammbefehl verwenden; CLD ruft kaum Mißverständnisse hervor. 


1.4 "Y HOCH X" - Erweiterte Exponentialfunktion 


Das Programm "Y HOCH X" benutzt keine Datenregister. Es erlaubt (wie 
die Rechnerfunktion Y hoch X) die Exponentialfunktion für sehr große 
oder sehr kleine Werte zu berechnen, ohne daß der Rechenbereich über- 
schritten oder unterschritten wird (OUT OF RANGE'). Die eingegebene 
Basiszahl muß jedoch positiv sein, 


B81*+LBLlL "YTr“ 


B2 8<>Y 
B1+LBL "Yrx 83 LOG 
® 84 * 

82 x<>Y 85 INT 

83 LOG 8& LASTX 
84 %* 87 FRC 

85 INT 88 181% 
86 LAST 893 “ 

097 FRC 18 RCLFLAG 
88 10Tx% 11 FIX 5 
e3 vr “ 12 ARCL Y 
18 FIX 5 13 "HF " 
11 ARCL % 14 Mi> Z 
12 "E ® 15 Xx<Q? 
13 X<>Y 16 "H-" 
14 %<B? 17 ABS 

u 18 FIX & 
16 ABS 19 186 

17 FIx 8 28 x>Y? 
18 108 z1 "H6" 
19 x%>Y? 22 RDN 

28 "H68“ 23 198 

21 RDN 24 xX>Y? 
22 18 25 "HB" 
23 K>YT? 26 RDN 

24 "HB" 27? ARCL *& 
25 RDN 28 RDN 

26 ARCL % 23 LAST* 
27’ RDN 38 K<>Y 
28 LASTK 31 RCL zZ 
29° R<PY 32 STOFLAG 
38 FIX ?2 33 RDN 

31 AVIEN 34 AYIENM 
32 END 35 END 
LBL'YT* LBL'’Yt“ 
END END 
57 BYTES 83 BYTES 


Ordnet man im USER-Modus den Programmstart der Funktionstaste 
Y hoch X zu, bleibt die Programmanwendung wie die Benutzung der 
Rechnerfunktion. Neben der Anzeige als Mantisse und Exponent liefert 
das Programm im X-Register die Mantisse und im Y-Register und LastX- 
Register den Exponenten des Ergebnisses, 


Bei diesem Programm stellt sich die Aufgabe, den Displaymodus während 
des Programms zu verändern. Das Ergebnis soll in der Mantisse mit fünf 
Nachkommastellen angezeigt werden, der Exponent wird ohne Kommastellen 
mindestens dreistellig angezeigt. Auf diese Weise kann das gesamte An- 
zeigefeld des Rechners sinnvoll genutzt werden. 


Hier werden zwei Programmversionen gezeigt, da (ohne das Ausnutzen der 
synthetischen Programmierung, auf die später eingegangen wird) nur mit 
Funktionen des X-Functions Moduls der ursprüngliche Displaymodus er- 
halten werden kann. Version | setzt am Schluß den Displaymodus auf 
FIX 9 (57 Bytes). Version Il benutzt RCLFLAG und STOFLAG aus dem 
X-Functions Modul, der ursprüngliche Displaymodus bleibt erhalten 
(63 Bytes). Zeile 09 ist eine Leerstelle (SPACE) im Alpharegister und 
könnte durch CLA ersetzt werden. 


Die eigentliche Berechnung innerhalb des Programmes "Y HOCH X" ge- 
schieht nur in den Zeilen 02 bis 08. Der restliche Programmteil erfüllt den 
Zweck, die Anzeige zu formatieren. 


Die Programmbeispiele in diesem Kapitel haben gezeigt, daß es nützlich 
sein kann, die Stackfunktionen des HP-41 in möglichst großem Umfange 
auszunutzen. Will man ganz auf die Benutzung der Datenregister ver- 
zichten, ist jedoch ein deutlich höherer Programmieraufwand erforderlich. 
Dies gilt besonders bei Programmen, die als Unterprogramme oder als 
Hilfsprogramme "zwischendurch! benötigt werden. Die Angabe SIZE 000 be- 
deutet, daß ein Programm kein Datenregister benutzt; es kann also eine 
beliebige Anzahl von Datenregistern definiert sein, deren Inhalt durch 
das Programm nicht verändert wird. 


Bei Verwendung von Stackfunktionen muß man sich jedoch darüber im 
klaren sein, daß die Stackinhalte während des Programmablaufs fort- 
während verschoben werden. Programme, die den Stack intensiv nutzen, 
sind auf den ersten Blick nicht so leicht zu lesen und zu verstehen wie 
vergleichbare Programme, die Datenregister verwenden. Zudem haben 
Veränderungen in solchen Programmen oft unvorhergesehene oder unbeab- 
sichtigte Folgen. Trotzdem sollte man mit der Benutzung von Daten- 
registern sehr sparsam umgehen. 


Der Reiz des Programmierens liegt auch hier darin, daß viele Wege zum 
gleichen Ziel führen, man muß nur den kennen, der die Möglichkeiten des 
Rechners - je nach Anforderung - optimal ausnutzt. 
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2 BASISUMRECHNUNGEN - KOMPAKTE DATENSPEICHERUNG 


In vielen Computern, so auch im HP-4I, werden Informationen im 
Hexadezimalsystem gespeichert, um eine möglichst kompakte Speicherung 
zu erreichen. Da für die einzelnen Ziffern dieses Systems Werte von 0 bis 
15 auftreten können, und die Ziffern mit den Werten 10 bis 15 mit den 
Buchstaben A bis F dargestelit werden, ist der HP-41 mit seinen alpha- 
numerischen Fähigkeiten für Umrechnungsroutinen des Hexadezimalsystems 
besonders gut geeignet. 


Die in diesem Kapitel vorgestellten Programme benutzen Funktionen des 
X-Functions Moduls und sind nur für ganze positive Zahlen zu verwen- 
den. 


2.1 "DH" - Dezimal-Hex-Wandler 


Bl+LBL "DH" Das Programm "DH" ‚rechnet eine ‚Im X-Regi- 
Be2 CLAa ster enthaltene Dezimalzahl in die entspre- 
chende Hexadezimalzahl um. Der Rechenbe- 

83+LBL 86 reich dieses Programms ist durch die zehn- 
84 RCL * stellige Anzeige auf 9999999999 = 2540BE3FF 
85 16 begrenzt. 

a6 MOD 

87 9 j r si 

88 - Die Funktion XTOA hängt das durch den 
83 X>0? Zeichencode im X-Register bestimmte Zeichen 
18 64 rechts an den Inhalt des Alpharegisters an. 
11 %<=87 Durch wiederholte Benutzung dieser Funktion 
12 57 wird das Alpharegister wie bei einem 
13 + Schreibvorgang von rechts nach links 
A re gefüllt. Die entsprechende Umkehr- 
16 SIGN funktion ATOX löscht ein Zeichen von links 
17 ARDOT aus dem Alpharegister und bringt den zuge- 
138 CLX hörigen Zeichencode ins X-Register. Wie- 
19 1& derholtes Ausführen dieser Funktion kann 
za + also mit einem Lesen des Alpharegisters 
21 INT verglichen werden. 

22 »>0? 

= en Um durch das Programm "DH" die richtige 
25 EHD Darstellung einer Hexadezimalzahl im Alpha- 

register zu erreichen, müssen die errech- 

ar neten Ziffern jedoch nacheinander links an 
49 BYTES das Alpharegister angehängt werden, da in 


aııfetaimanrlan Pntanzan nararhnat wire 
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XTOA, CHS, SIGN, AROT erfüllen die Aufgabe: Das errechnete Zeichen 
wird zunächst rechts angehängt und dann durch AROT an die vorderste 
Stelle des Alpharegisters versetzt. 


Die in dem Programm enthaltenen Rechenoperationen mit den Zahlen 9, 
64 und 57 sind dadurch zu erklären, daß der Zeichencode für die 
Ziffern 0 bis 9 (48 bis 57) nicht an den Zeichencode für die Ziffern A bis 
F (65 bis 70) anschließt und daher eine Abgrenzung erforderlich ist. 
Sofern nur Berechnungen bis zur Größe der Dezimalzahl 16777215 
(FFFFFF) erforderlich sind, kann in Zeile 24 statt AVIEW der Befehl 
ASTO X zur Anzeige der errechneten Hexadezimalzahl eingesetzt werden. 


2.2 "HD" - Hex-Dezimal-Wandler 


Das Programm "HD" erfüllt genau die umge- 


kehrte Aufgabe, es errechnet aus der Hexa- ail+LBL "HD" 


dezimalzahl im Alpharegister die ent- nn a 

sprechende Dezimalzahl und schreibt diese in 

das X-Register. Dabei wird zunächst die 84+LBL 58 

Anzahl der im Alpharegister dargestellten 85 16 

Ziffern durch die Funktion ALENG festge- 06 * 

stellt und das Ergebnis dann in Zeile 16 ss as 

(DSE Y) als Schleifenzähler verwandt. "HD" 09 - 

ist wesentlich kürzer als "DH", da die Lese- 18 X>87 

richtung von ATOX direkt verwendet werden 11 2 

kann. 12 xi=B”7 
13 9 

Die Funktionsweise der beiden Programme 14 + 

kann als Grundlage für Umrechnungsroutinen n ee x 

für die Zahlensysteme der Basis 2 bis 36 ? CTO #0 

dienen. Dazu ist lediglich die Zahl 16 in den 18 x<a? 

beiden Programmen durch die gewünschte 19 CL 

Basiszahl zu ersetzen. Soll das Umrech- 28 END 

nungsprogramm variabel für verschiedene 

Basen eingesetzt werden können, ist die =" 

Zahl 16 jeweils durch einen Registeraufruf 33 BYTES 


(RCL NN) zu ersetzen und die gewünschte 
Basiszahl im Register NN zu speichern. 
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2.3 "DB" - Dezimal-Binär-Wandler 
2.4 "BD" - Binär-Dezimal-Wandler 


Programmoptimierung kann bedeuten, ein Programm für einen Spezialfall 
(Hexadezimalsystem) in ein für eine Vielzahl von Fällen anwendbares 
Programm umzuwandeln. Optimierung ist aber auch anders möglich, wie 
die beiden folgenden Programme "DB" und "BD" zeigen. 


Das Programm "DB" wandelt eine Dezimalzahl im X-Register in die ent- 
sprechende Binärzahl um und schreibt das Ergebnis in das Alpharegister. 
Da das Alpharegister maximal 24 Stellen aufnehmen kann, hat der Rechen- 
bereich 16777215 als Obergrenze, Das Programm "BD" erfüllt die um- 
gekehrte Aufgabe, es rechnet eine Binärzahl aus dem Alpharegister in die 
entsprechende Dezimalzahl um und speichert sie im X-Register. Da hier 
nur zwei verschiedene Zeichencodes (48 und 49) verwendet werden, 
können die Rechenschritte gegenüber den Programmen "DH" und "HD" 
vereinfacht werden. Dadurch ergibt sich die augenfällige Kürze dieser 
Binärwandler, die natürlich auch der Schnelligkeit zugute kommt. 


Die beiden Programme "DB" und "BD" können auch für Umrechnungen zur 


Basis 3, 4, 6 und 8 verwendet werden, wenn die Basiszahl in den Pro- 
grammen entsprechend ausgetauscht wird. 


Bi*+LBL "DB" 


82 CLA 
B3+LBL 088 
84 RCL x 
05 2 
86 MOD 
a7 48 B1*+LBL "BD" 
288 + 82 ALENG 
89 XTOR 03 8 
18 CHS 
11 SIGN 84+LBL @B 
12 AROT 85 2 
13 CLX 85 * 
14 2 7?” ATOx 
15 7 88 LASTX 
16 INT 89 MOD 
17 x>0? 18 + 
18 GTO 88 11 DSE “ 
19 AYIENM 12 GTO 68 
28 END 13 END 
LBL"’DB LBL'ED 
END END 


32 BYTES z4 BYTES 
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2.5 "XB" - Dezimal-Binär-Wandler 
B1l+LBL "RB" 


& A B2 X<>F 
Nach einem anderen Prinzip arbeitet das Pro- 03 7 
gramm "XB". Es benutzt den Status der 84 CHS 
Flags 00 bis 07 zur Umwandlung einer De- B5 “ “ 


zimalzahl in die entsprechende Binärzahl. 
B6+LBL Ga 


Der Rechenbereich dieses Programms ist oe? FS? IND 


auf 0 bis 255 begrenzt. Der Originalzustand B8 "Fi" 


ger Flags 00 bis 07 wird durch das Pro- 83 FC? IND 
gramm wiederhergestellt (Zeile 14). Dieses er 
Programm erfüllt bezüglich der Zahlen 0 bis 18 "HF8" 
255 den gleichen Zweck wie das Pro- 11 ISG = 
gramm "DB". Es ist jedoch wesentlich 12 GTO 00 
schneller. Zeile 05 enthält wieder einen 13 en 
Leerschritt im Alpharegister (SPACE) und ee 
kann durch CLA ersetzt werden. 1& END 

LBL’#B 

END 

34 EYTES 


2.6 "XA"/"AX" - Kompakte Datenspeicherung 


Da im Alpharegister des HP-41 Zeichencodes von 0 bis 255 eindeutig ver- 
schlüsselt werden können (obwohl diese in der Anzeige nicht immer unter- 
scheidbar sind), müßte sich eine besonders kompakte Datenspeicherungs- 
methode dadurch ergeben, daß man Zahlen im Zahlensystem zur Basis 256 
im Alpharegister verschlüsselt. Da jedoch Null-Bytes im Alpharegister zu 
Problemen bei der Codierung und Decodierung führen, müssen diese ver- 
mieden werden. Das folgende Programm "XA"/"AX" enthält daher Basis- 
umwandlungsroutinen zur Basis 255, der Zeichencode wird zur Vermeidung 
von Null-Bytes jeweils um 1 erhöht. Bei dem hier verwendeten Codier- 
system gibt das erste Byte an, wie viele der folgenden Bytes die nächste 
codierte Zahl darstellen. Das ist ein Prinzip, wie es in Großcomputern 
verwandt wird, um Daten mit variabler Feldlänge zu speichern. 


Sofern nur eine Zahl codiert wird, ist dieses zusätzliche Kennzeich- 
nungsbyte nicht erforderlich. Diese Routine kann dazu verwandt werden, 
codierte Zahlen fortlaufend in einem Record eines ASCII-Files abzulegen 
und so den Speicherplatzbedarf gering zu halten. 


Die Routine liefert nur exakte Ergebnisse bis einschließlich 2550000253. 
Für größere Zahlen sind durch Rechenungenauigkeiten geringe Abwei- 
chungen möglich. 
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81+LBL "XR” 


a2 CLA 


83+LBL 80 
84 RCL x 
85 255 


89 XEQ@ 681 


17+LBL 61 
18 XTOA 
19 CHS 

28 S5IGN 
21 AROT 
22 RTN 


23+LBL "AX" 


24 ATOX 
25 06 


26*+LBL B2 
27 255 

25 * 

29 ATOX 
38 1 

31 — 

32 + 

33 DSE Y 
34 GTO 82 
35 END 


LBL'’* 
LEL"AX 
END 

84 BYTES 


Wie viele Bytes für eine Dezimalzahl ver- 
braucht werden, ist in der folgenden Tabelle 
festgehalten: 


0... 254 2 Bytes 

255 ... 65024 3 Bytes 
65025 ... 16581374 y4 Bytes 
16581375 .„.. 4228250623 5 Bytes 
bis ca. 1,05 E 12 6 Bytes 
bis ca. 2,7 E 14 7 Bytes 


Da die Speicherung jeder Zahl in einem Da- 
tenregister 7 Bytes beansprucht, sind 
besonders bei großen Datenmengen, durch 
die Codierungsroutine "XA"/"AX" erhebliche 
Einsparungen möglich. Zu beachten bleibt 
jedoch, daß ein direkter schneller Zugriff 
auf die Daten nicht mehr möglich ist. 


3 ZUFALLSZAHLEN - LOTTOZAHLEN 
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Zin programmierbarer Rechner ist ein ideales Werkzeug zur Auswertung 
«on Zufallsgeneratoren und Statistiken. Mit dem im folgenden dargestellten 
Programm "STAT" kann dies modellhaft verdeutlicht werden. 


3.1 "STAT" - Statistische Auswertung 


Das Programm "STAT" erfordert SIZE 050. 
=s dient dazu, Zufallsgeneratoren, die in 
diesem Fall Lottozahlen (1 bis 49) erzeugen, 
statistisch zu beurteilen. 


Der Zufallsgenerator, den man testen 
möchte, muß nach Zeile 05 in das Programm 
eingefügt werden. Dazu kann Register 00 
benutzt werden, das Programm benutzt nur 
Register 1 bis 49. Es kann auch ohne Zu- 
fallsgenerator in der vorliegenden Form 
direkt verwendet werden. Die Anzahl der 
gewünschten Zufallszahlen ist einzugeben, 
und das Programm zu starten. 


Nachdem alle Datenregister gelöscht wurden, 
(Zeile 02) wird die Wurzel aus 7 als Start- 
wert zur Erzeugung der Lottozahlen vorge- 
geben. Der Befehl ST+ IND Y in Zeile 12 
erhöht den Wert des Registers entsprechend 
der ermittelten Zahl um 1. Somit steht nach 
Ablauf dieses Programmabschnitts (LBL 00) 
in jedem Register, wie oft die Zahl ent- 
sprechend der Registernummer ermittelt 
wurde. Ist z.B. die Zahl 38 sieben mal 
'gezogen' worden, findet sich in Register 38 
die Zahl 7. Im nächsten Programmabschnitt 
{LBL 01) wird zu jedem der benutzten 
Datenregister 1% der Registernummer 
addiert. D.h. aus der Beispielzahl in 
Register 38 wird 7,38. 


Bi+LBL "STA 
T" 

82 CLRG 

83 7 

84 SORT 


85+LBL Bu 
86 FRC 

87 49 

83 * 

89 1 

18 + 

11 SIGN 

12 ST+ IND 


17+LBL 81 
15 1 

19 % 

28 ST+ IHD 


21 RDN 

22 DSE * 

23 GTOG 81 
24 ,049 

25 XEQ "SO" 
26 END 


LBL’STAT 
END 
S8 BYTES 
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Durch dieses Verfahren werden in einem Register zwei Zahlen ge- 
speichert: Vor dem Komma steht die Anzahl, wie oft eine Zahl ermittelt 
worden ist, und hinter dem Komma steht diese ermittelte Zahl selbst. Die 
Zeilen 24 und 25 rufen das Sortierprogramm "SO" auf, das in Kapitel 9 
vorgestellt wird. Sofern ein Zufallsgenerator in das Programm eingefügt 
wurde, der Register 00 benutzt, ist Zeile 24 vor der Sortierung in 1,049 
zu ändern, damit Register 00 nicht in die Sortierung miteinbezogen wird. 
Nach Ablauf des Programms (einschließlich Sortierung) ist in den Re- 
gistern 01 bis 49 in aufsteigender Reihenfolge erkennbar, wie oft eine 
Zahl 'gezogen' wurde. 


Mit Hilfe des Programms "STAT" kann man sehr gut erkennen, daß die 


Verteilung der Zahlen bei großen Zahlenmengen kaum noch von der Wahl 
des Zufallsgenerators abhängt. 


3.2 "DTA" - Kompakte Datenspeicherung 


a1l+LBL "DTRA Für eine statistische Auswertung ist zu- 
“ nächst von großer Bedeutung, sehr viele 
BE 8 Daten möglichst effektiv zu speichern, d.h. 
84 CLA so wenig wie möglich Speicherplatz dazu zu 
85 ENTERtT verwenden. Ergänzend zu dem im vorigen 
Kapitel gezeigten Beispiel der variablen 
a6+LBL 98 Datenspeicherung ("XA"/"AX") soll das 
97 8<aY Programm "DTA" zeigen, wie man sechs 
es See 9 Zahlen in einem Register speichern kann. 
18 STOP 
11 X=9? Das Programm "DTA" dient dazu, sechs 
12 GTO 91 positive ganze Zahlen im Bereich von 1 bis 
13 xTon 255 in einem Register zu speichern. Möchte 
14 DSE L man z.B. alle gezogenen Lottozahlen eines 
15 GTO 86 Jahres speichern, so wäre dies mit der 
= en " normalen Speicherungsmethode (je Zahl ein 
18 STO IND Datenregister) nicht möglich, da der Spei- 
z cherplatz des Rechners nicht ausreichen 
19 CLA würde. Außerdem gäbe es erhebliche organi- 
28 LAST satorische Probleme (in welchem Register ist 
z1ı RTN welche Zahl?). Das Programm "DTA" löst 
>22*LBL 81 diese Aufgabe, indem sechs Zahlen als 
23 RCL IND Alpha-Bytes in einem Register gespeichert 
y werden. Das Programm dient sowohl zum 
24 XTOR Speichern als auch zum Zurückrufen der 
Zahlen. 
25+LBL B= 
26 ATOR Bevor das Programm gestartet wird, ist der 
— —. L Index entsprechend des Registers einzuge- 
29 GTO 9> ben, das angesprochen werden soll. 


38 END 
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Der Ton (Zeile 09) kennzeichnet den Programmstopp an dem Eingaben 
erfolgen können. Man kann nun sechsmal je eine Zahl (Bereich 1 bis 255) 
eingeben und mit R/S fortfahren. Dann sind die sechs eingegebenen 
Zahlen in dem vorher bezeichneten Register gespeichert. Startet man nun 
3as Programm erneut mit derselben Registernummer und führt nach dem 
Ton sofort (ohne Zahleneingabe) mit R/S weiter, so werden die vorher 
eingegebenen sechs Zahlen zurückgerufen. 


Auch das Organisationsproblem läßt sich mit dieser Speichermethode gut 
ösen: Die Nummer des verwendeten Datenregisters gibt eine gute Ord- 
nungsmöglichkeit. So lassen sich in 52 Datenregistern alle gezogenen 
Lottozahlen eines Jahres speichern. In Zeile 24 wird ein Nebeneffekt 
von XTOA benutzt: Wenn das X-Register Alpha-Daten enthält, werden 
diese an das Alpharegister angehängt. Hier könnte also ebenso der 
Befehl ARCL X verwendet werden, 


81+LBL "DFL 


3.3 "DFL" - Kompakte Datenspeicherung 82 SEEKPTA 
83 6 
Das Programm "DFL" erfüllt einen ähnlichen 84 FRC 
Zweck wie "DTA", jedoch werden hier die 85 CLA 
eingegebenen Zahlen in einem Datenfile des 86 ENTERt 
erweiterten Speicherbereichs, also nicht in 87*+LBEL 98 
Datenregistern abgelegt. Das Datenfile ist 93 X<>Yy 
vorher in der erforderlichen Größe anzulegen 89 RDN 
(CRFLD). Ist der File-Zeiger nicht auf das 18 TONE *? 
gewünschte Datenfile positioniert, muß bei 11 STOP 
der ersten Benutzung des Programms "DFL" 12 x=86? 
der File-Name in das Alpharegister einge- 3 AR 
geben werden, sonst ist die Bedienung wie 15 DSE L 
beim Programm "DTA". 16 GTO 980 
1” SIGN 
Die Programme in diesem Kapitel haben ge- 18 ASTO = 
zeigt, daß man mit recht kurzen Routinen 19 SAVE» 
erhebliche Einsparungen des Platzbedarfes = a 
bei der Datenspeicherung erreichen kann, 22 RTN 
Daß alle gezeigten Routinen nur für positive 
ganze Zahlen verwendbar sind, ist keine für 23+LBL #81 
die Praxis wesentliche Einschränkung. Durch 24 GETX* 
einfache Kennzeichnung kann man auch 25 XTOR 


negative Werte in die Routinen mit ein- 


beziehen, und die Verschiebung des Kommas ae Due 


27? ATOX 
zur Verwendung von Dezimalzahlen ist 28 PSE 
ebenfalls problemlos realisierbar. 23 DSE L 


38 GTO 62 
31 END 
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4 EINFACHES CODIEREN VON TEXT 


Dieses Kapitel zeigt mit mehreren Programmbeispielen, daß die Benutzung 
des X-Functions Moduls (ALENG, XTOA, ATOX) außerordentlich kurze 
Routinen zur Textcodierung ermöglicht. 


4.1 "CA" - Codiere Alpha 


4.2 "DA" - Decodiere Alpha 


Bil+LBL "CR" 81+LBL "DA" 
82 ALENG 82 ALENG 
B3+LBL 698 83+LBL 88 
84 ATOX 84 ATOX 
85 RCL Y 85 RCL Y 
66 3 86 3 

87 * 87 * 

B8 + 88 — 

89 XxTORA 893 %TORA 
18 RDN 18 RDN 

11 DSE »® 11 DSE * 
12 GTO 94a 12 GTO 68 
13 END 13 END 
LEL"CA LBEL"DA 
END END 
26 BYTES 26 BYTES 


Die Routinen "CA" und "DA" verschlüsseln den Text innerhalb des 
Alpharegisters selbst. Die Routine "CA" verschlüsselt den Text, und 
durch die Routine "DA" wird wieder entschlüsselt. Es ist auch möglich, 
die Verschlüsselung häufig zu durchlaufen; dann muß die Entschlüsselung 
ebenfalls entsprechend mehrfach durchlaufen werden. 


Trotz der außerordentlichen Kürze der Routinen werden gleiche Buch- 
staben nicht gleich verschlüsseitt, da die Position des Buchstabens 
innerhalb des Alpharegisters in die Codierungsberechnung mit einbezogen 
wird. Außerdem läßt sich auch "DA" als Verschlüsselungsprogramm ver- 
wenden; dann wirkt "CA" als Entschlüsselungsprogramm. Datenregister 
werden von den Programmen nicht benutzt. 
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-.»t man Text ins Alpharegister ein, läßt den Alpha-Modus eingeschaltet 
rd startet das Programm mit R/S, so ist die Verschlüsselung direkt zu 
„eobachten. Durch Veränderung der Rechenschritte ist nach dem Prinzip 
- ser Programme eine individuelle Chiffrierung möglich. Dabei muß darauf 
>eachtet werden, daß das Rechenergebnis immer im Bereich zwischen 1 
nd 255 verbleibt. 


ı.3 "CODE" - Codiere/Decodiere Alpha 


Z2s Programm "CODE" dient gleichzeitig als Bl*LEL "Con 
‚.erschlüsselungs- und Entschlüsselungspro- E'" 
-ramm. Die Verschlüsselung findet ebenfalls 82 SIGN 

83 ALENG 


-nerhalb des Alpharegisters statt, Daten- 


-=gister werden nicht benutzt. Zur Ver- 04*+LBL 66 


schlüsselung wird eine vor dem Programm- 85 ATOX 
szart in das X-Register einzugebende Zahl 86 LASTX 
.erwendet. B7 - 

85 *<TOA 
=jr normale Textverschlüsselung im Bereich 82 RDN 
»er Buchstaben A bis Z sollte eine Ver- 18 DSE 8 
schlüsselungszahl im Bereich von 218 bis 320 m Rn 
zewählt werden, um den Text nach der Ver- 13 CLST 
schlüsselung unkenntlich zu machen. Dieses 14 END 
?2rogramm verschlüsselt gleiche Buchstaben 
rit gleichen Werten. Trotzdem ist der LBL’CODE 
Z!fekt, gemessen an dem geringen Programm- END 


sufwand, recht erstaunlich. 28 BYTES 


Dieselbe Zahl, mit der verschlüsselt wurde, ist auch zur Entschlüsselung 
zönzugeben. Die Zeilen 12 und 13 dienen dazu, jeden Hinweis auf die Art 
ser Verschlüsselung aus dem Rechner (insbesondere LastX-Register) zu 
Sschen. 


=,a "C-A" - Codiere Alpha 


.5 "D-A" - Decodiere Alpha 


Zine weitere Alternative zur Textcodierung stellen die Programme "C-A" 
„nd "D-A" dar. Bei diesen Programmen wird der Inhalt des Alpha- 
registers in Datenregister verschlüsselt. Je nach Länge des zu ver- 
schlüsselnden Textes ist also maximal SIZE 025 erforderlich. Diese 
Programme verarbeiten sämtliche Bytewerte (0 bis 255) einwandfrei; 
gleiche Zeichen werden nicht gleich verschlüsselt. 


Zur Verschlüsselung ist das Programm "C-A" zu starten. Nach dem Ton 
stoppt das Programm, und es wird der Inhalt des Alpharegisters ange- 
zeigt. Soll dieser Inhalt verschlüsselt werden, ist mit R/S zu starten. 
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Andernfalls kann der zu verschlüsselnde Text eingegeben werden, und 
anschließend ist das Programm mit R/S zu starten. Nach Programmablauf 
ist der Inhalt des Alpharegisters in Zahlenwerten in den Datenregistern 
verschlüsselt; das Alpharegister ist gelöscht. 


Zur Entschlüsselung dient das Programm "D-A", es ist ohne jede Eingabe 
zu starten, Nach der Entschlüsselung bleiben die Inhalte der Daten- 
register unverändert erhalten, so daß mehrfach darauf zurückgegriffen 
werden kann. Durch Veränderung der Rechenschritte ist auch bei diesen 
Programmen eine individuelle Codierung möglich. 


Bil+LBL "D-A 
B81+LBL "C-A “ 


82 CLA 
82 CLRG 83 RCL 66 
83 AON 84 REÜLFLAG 
84 TONE 6& 85 FIX g 
85 STOP 
86 AOFF 6#£+LBL a6 
87 ALENG 87 RCL IHD 
85 STO 09 er 
88 RCL 2 
69+LBL &6 83 x* 
18 ATO® 18 x=0? 
11 LN 11 Et# 
12 STO IND 12 RND 
Yv 13 %TOR 
13 RDN 14 RDN 
14 ST IND 15 DSE VW 
nr 16 GTO ca 
15 ALENG 17 STOFLAG 
16 x=#8? 18 TONE & 
17 GTO 608 19 CLST 
18 CLST 28 AYIEU 
12 END 21 END 
LEL’'C-A LEL"'D-A 
END END 
34 BYTES 38 EYTES 


Die in diesem Kapitel gezeigten Routinen erheben nicht den Anspruch auf 
besonders sichere oder komplizierte Chiffrierung, sie lassen jedoch er- 
kennen, daß mit geringem Aufwand an Programmspeicherplatz bereits ein 
recht brauchbares Ergebnis erreicht werden kann. 
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EINSTIEG IN DIE SYNTHETISCHE PROGRAMMIERUNG 


„ter der synthetischen Programmierung versteht man die Erzeugung von 
--ogrammschritten, die durch normale Methoden, wie sie im Benutzer- 
-andbuch genannt sind, nicht hergestellt werden können, 


- dies zu erreichen, sind in der Regel Hilfsprogramme erforderlich, die 
se.bst wiederum synthetische Befehle enthalten. Die entscheidende Frage 
:ı also: Wie ist mit normalen Hilfsmitteln ein Einstieg in die synthetische 
"-ogrammierung möglich? 


„nächst muß gesagt werden, daß synthetische Befehle, wenn sie einmal 
” Frogrammspeicher enthalten sind, ihre ganz normale definierte Funk- 
:aswirkung haben und auch durch die üblichen Speichermedien wie 
wagnetkarten, Barcode oder Digital-Cassette gespeichert und übertragen 
„erden können. Da die Eingabe einiger synthetischer Befehle recht 
z.?wendig ist und nur über Hilfsprogramme erreicht werden kann, sind 
z.r schnelleren Benutzung für den Leser dieses Buches sämtliche Pro- 
z’amme im Anhang als Barcode abgedruckt. Die Programme können also 
zinfach' eingelesen und benutzt werden, als wären nur normale Befehle 
=thalten. 


Zie Grenze zwischen "normaler Programmierung" und synthetischer Pro- 
zrammierung ist fließend: Durch Einführung des X-Functions Moduls sind 
srundlegende Schritte mit normalen Mitteln programmierbar geworden, die 
.orher nur sehr aufwendig mit Hilfe der Synthetik erreichbar waren, Hier 
sind besonders die Befehle XTOA und ATOX von Bedeutung. Das Modul 
st daher eine wesentliche Grundlage für die fortschrittliche Pro- 
srammierung; alle seine Funktionen sind in dem neuen Taschencomputer 
=P-YICX enthalten. Trotzdem ist es mit den Funktionen dieses Moduls 
zilein noch nicht möglich, ein Hilfsprogramm für synthetische Pro- 
zrammierung herzustellen, das selbst keine synthetischen Befehle enthält. 


Jieser entscheidende Schritt ist jedoch mit dem IL-Development Modul 
-öglich. Wegen der grundlegenden Bedeutung des IL-Development Moduls 
"„ird darauf in Kapitel 10 besonders eingegangen. 
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Die synthetische Programmierung hat im wesentlichen vier Aufgaben- 
bereiche: 


- Durch einige synthetische Befehle ist es möglich, die Organisation des 
Rechners kennenzulernen. 


- Neue synthetische Befehle ermöglichen Problemlösungen, die mit nor- 
malen Programmbefehlen nicht möglich sind. 


- Einige synthetische Befehle verringern den Programmspeicherplatzbedarf 
und/oder erhöhen die Rechengeschwindigkeit. 


- Einige synthetische Befehle erlauben die Benutzung von Statusregistern 
als Zwischenspeicher; der Bedarf an Datenregistern kann dadurch ein- 
geschränkt werden. 


Da die Entdeckung und Entwicklung der synthetischen Programmierung 
zunächst von dem amerikanischen Anwenderclub für Taschencomputer 
(PPC) ausging, sind Publikationen über die synthetische Programmierung 
meist in englischer Sprache erschienen. Eine grundlegende und um- 
fassende, nicht nur auf die Theorie beschränkte Darstellung der 
synthetischen Programmierung, ist in den Büchern von Keith Jarett und 
im PPC ROM Users Manual enthalten (Siehe Literaturhinweise im Anhang). 
Das PPC ROM Users Manual ist eigentlich ein Benutzerhandbuch für das 
von Mitgliedern des PPC programmierte PPC Modul. Alle 122 Programme, 
die im PPC Modul enthalten sind, werden in diesem 500 Seiten um- 
fassenden Handbuch schrittweise erklärt. Zusätzlich ist eine vorbildliche 
Einführung in die Theorie der synthetischen Programmierung enthalten. 
Das PPC ROM Users Manual bietet daher in kompakter und übersichtlicher 
Form eine Fülle grundlegender Information für die synthetische 
Programmierung. 


Es ist empfehlenswert, daß sich der Leser zunächst mit den theoretischen 
Grundlagen der synthetischen Programmierung vertraut macht. In diesem 
und in den folgenden Kapiteln soll weniger die Theorie, als vielmehr die 
praktische Anwendung und der sinnvolle Nutzen der Synthetik im Vorder- 
grund stehen. Programme mit synthetischen Funktionen und Programmier- 
techniken werden vorgestellt und in ihrer Funktionsweise analysiert. 


Voraussetzung zum Verständnis ist das Wissen um die Organisations- 
struktur des HP-41. Wesentlich dazu ist zunächst, daß der Rechner in 
Registern organisiert ist, jedes Register hat eine absolute Register- 
adresse, die nicht geändert werden kann. Jedes Register besteht aus 
7 Bytes (Byte Nr. 0 bis 6). Alle Register sind identisch strukturiert, 
unabhängig davon, ob es sich um Programmregister, Datenregister, 
Tastenzuordnungsregister, Alarmregister (Time Modul) oder Register im 
erweiterten Speicherbereich handelt. Es gibt also grundsätzlich keine 
zwingende Zuordnung eines bestimmten Registers zu einer bestimmten 
Aufgabe. Lediglich 16 Statusregister (absolute Registeradressen 0 bis 15) 
haben eine feste Aufgabenzuordnung. 
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Zres dieser Statusregister, Register c, enthält sämtliche Schlüssel- 
-“ormationen über die Aufgabenzuordnung aller übrigen Register. Hier 
sı festgelegt, welche Register als Datenregister und welche Register als 
”-grammregister definiert sind. Diese Abgrenzung wird durch die 
"unktion SIZE oder PSIZE verändert. 


as geschieht dadurch, daß in Register c die absolute Adresse des ersten 
Zatenregisters (Register 00) gespeichert wird. Diese absolute Adresse des 
—=ativen Datenregisters 00 bezeichnet man als Curtain. Bei der normalen 
”-ogrammierung sind die absoluten Adressen ohne Bedeutung. Der Zugriff 
zuf die Datenregister erfolgt (STO, RCL, ... ) über relative Adressen. 
=2s Wissen um die absoluten Registeradressen ist jedoch für die 
s“nthetische Programmierung von grundlegender Bedeutung. 


=2.n weiteres Statusregister, Register b, wird in den folgenden Pro- 
zrammen verwandt. In diesem Register ist zunächst die absolute Adresse 
>es Programmzeigers gespeichert (Byte 0 und 1). Bei der Abarbeitung 
»ines Programmes oder der Ausführung von Sprungbefehlen wird diese 
Adresse fortlaufend angepaßt. Die Befehlsfolge RCLb, ... ,„ STOb 
.erdeutlicht die Funktion des Programmzeigers. Fügt man zwischen RCL b 
„nd STO b zum Beispiel TONE 8 ein und startet bei RCL b, so wird der 
”on immer wieder ausgeführt, bis das Programm von der Tastatur aus 
angehalten wird. 


wegen der Vielzanil der Anwendungsmöglichkeiten der Programmzeiger- 
ranipulationen werden diese in Kapitel 7 ausführlich behandelt. In den 
weiteren Bytes des Statusregisters b ist zunächst die erste Rück- 
sprungadresse gespeichert. Tritt in einem Programm ein Befehl XEQ NN 
auf, so wird die absolute Adresse des nächsten Programmbefehls als 
Rücksprungadresse gespeichert; sobald im Programm das nächste RTN 
der END auftritt, wird diese Rücksprungadresse zur Programmzeiger- 
adresse, und der Programmbefehl wird ausgeführt. 


5.1 "LB" - Load Bytes I 


Ein klassisches Synthetikprogramm ist "LB". Mit diesem Programm können 
beliebige Bytewerte in den Programmspeicher eingegeben werden. Es 
enthält drei synthetische Anweisungen, die zur Funktion des Programms 
erforderlich sind. 


Diese Anweisungen können mit einem Tastenzuordnungsprogramm erzeugt 
werden und dann problemlos in den Programmspeicher eingegeben werden 
(z.B. Programm "KA", Seite 65). Das hier vorgestellte "LB" benutzt 
keine Datenregister, entweder das X-Functions Modul oder der HP-4ICX 
werden benötigt. Bei der Entwicklung dieses Programms wurde besonderer 
Wert auf Kürze und Schnelligkeit gelegt. 
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Programmbedienung "LB" (Load Bytes |) 
1. RTN ausführen. 


2. Man gehe zu der Programmzeile, in der synthetische Bytes eingegeben 
werden sollen. 


3. PRGM einschalten; eingeben: XEQ "LB", STOP, +,+, +, ... als 
Pufferbytes eingeben (man kann hier jeden Ein-Byte-Befehl ein- 
geben). Man muß mindestens 19 Pufferbytes eingeben, um 1 bis 6 
Bytes synthetisch laden zu können. Jedes angefangene zusätzliche 
Register erfordert die Eingabe von sieben weiteren Pufferbytes. 


4. Zu der Programmzeile zurückgehen, die XEQ "LB" enthält, PRGM aus- 
schalten, R/S. 


5, Der Ton zeigt den Programmstopp an, um die Dezimalwerte der ge- 
wünschten synthetischen Bytes einzugeben. Man sieht jeweils in der 
Anzeige die letzte Eingabe. 


6. Dezimalwert des gewünschen Bytes eingeben (ohne ENTER), dann 
R/S. Auf diese Weise ist für die weiteren Eingaben fortzufahren. 


7. Um die Eingaben zu beenden: nur R/S (ohne Eingabe). 


8. Nach dem BEEP: PRGM an und die übriggebliebenen Pufferbytes, so- 
wie XEQ "LB" und STOP löschen. 


Man achte darauf, daß genügend Pufferbytes eingegeben werden! Während 
der Eingabe dürfen die Stackregister, LastX und Alpha, nicht verändert 
werden. Das Programm sollte nicht angehalten werden; zwischen den Zei- 
len 40 und 44 erhält man sonst MEMORY LOST. Hält das Programm in 
Zeile 08 mit NONEXISTENT, wurde entweder "LB" von der Tastatur aus 
gestartet oder zu Beginn RTN nicht ausgeführt. 


Wie funktioniert nun die synthetische Eingabe von Programmbytes mit 
"LB"? Da das Programm mit XEQ "LB" aufgerufen wird, ist die absolute 
Adresse des Registers, in das die ersten Bytes synthetisch eingegeben 
werden sollen, als erste Rücksprungadresse im Register b enthalten. Ein 
Großteil des Programms "LB" dient dazu, diese erste Rücksprungadresse 
zu decodieren (Zeilen 03 bis 22). Dazu ist deshalb so großer Aufwand er- 
forderlich, weil Fehlbedienungsmöglichkeiten ausgeschlossen werden 
sollen. Außerdem müssen sämtliche denkbaren Fälle von Null-Bytes in 
Register b berücksichtigt werden. Der Befehl GTO IND Z benutzt als 
Argument die Anzahl der Bytes, die in Register b gestanden haben. Das 
Programm soll nur einwandfrei arbeiten, wenn genau eine Rücksprung- 
adresse in Register b enthalten war. Das ist nur dann der Fall, wenn 
Register b entweder vier oder drei Bytes enthielt. 
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27’+LEL BB 


Bl+LBL "LE" 28 F535? 22 
82 CLA 29 TONE >? 
03 RCL b 3a FS?C 22 
84 <> [ 31 STOP 
85 ALENG s2 FC? z2 
06 7 33 ., 
87 ATOX 34 XTÜR 
83 GTO IND 35 XKS> 
zZ 36 RDN 

37 DSE 
89+_LBL d4 38 GTO ac 
18 2 39 7 
11 MOD 408 Xi> c 
12 256 41 <> L[L 
13 * 42 STO IND 
14 ALENG L 
i5 2 43 <> I 
18 - 44 RX> c 
17 ATOXx 453 XRX> 
13 * 46 CLA 
13 8207 47 DSE L 
20 CL= 43 FS”? Z2 
21 + 43 GTO an 

58 BEEP 
22+LBL 63 51 END 
23 2 
24 — LEL’LE 
25 FRC END 
26 SF Z= 83 EYTES 


Deshalb sind als Sprungziele LBL 04 und LBL 03 vorgesehen, Bis zur 
Zeile 22 ist aus Register b die absolute Adresse der Stelle errechnet 
worden, an der der Befehl STOP nach XEQ "LB" steht; der Inhalt von 
Register b, also auch die gespeicherte Rücksprungadresse, wird dabei 
nicht verändert. Fortlaufende Programmzeilen haben absteigende absolute 
Adressen, d.h., die Stelle an der die synthetischen Bytes eingegeben 
werden sollen, hat eine niedrigere absolute Adresse als die Stelle, an der 
der Stoppbefehl steht. Es wurde jedoch aus dem Inhalt des Register b 
nicht die absolute Byteadresse sondern nur die absolute Registeradresse 
des Stoppbefehls decodiert. Die nach dem Stoppbefehl eingegebenen 
Pufferbytes sollen später durch die einzugebenden synthetischen Befehle 
überschrieben werden. Damit ausgeschlossen ist, daß der Stoppbefehl 
selbst auch überschrieben wird, wird von der errechneten absoluten 
Adresse 2 abgezogen. In Zeile 25 wird die so errechnete absolute 
Registeradresse in das LastX-Register gespeichert und gleichzeitig im 
X-Register eine 0 erzeugt. 


Die folgenden Zeilen 27 bis 38 stellen die eigentliche Eingabeschleife dar. 
Solange noch Eingaben gemacht werden (Flag 22), wird ein Ton erzeugt 
und in Zeile 31 das Programm angehalten, 
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In Zeile 34 wird der eingegebene Wert als Zeichen an das Alpharegister 
angehängt. Zeile 37 (DSE Y) bewirkt, daß jeweils 7 Eingaben zusammen- 
gefaßt werden (ein Register enthält 7 Bytes). Sofern keine weitere 
Eingabe erfolgt, wird ein Null-Byte an das Alpharegister angehängt 
(Zeilen 32 und 33). Wurde das siebte Byte eingegeben, wird der Sprung- 
befehl in Zeile 38 nicht ausgeführt. Die 7 in Zeile 39 ist schon der 
Schleifenzähler für die nächsten 7 Byte-Eingaben und erscheint später 
wieder im Register Y. Zeile 40 tauscht nun zunächst den Inhalt von 
Register c mit dieser 7. Das bewirkt, daß der Curtain auf die absolute 
Registeradresse 000 gesetzt wird. Damit sind für diesen Fall die absoluten 
und relativen Adressen identisch. 


Register c enthält aber neben den Schlüsselinformationen zur Register- 
adressierung auch noch einen Kontrollwert, der grundsätzlich nicht ver- 
ändert werden darf. Entspricht dieser Wert nicht mehr der vom Betriebs- 
sytem erwarteten Größe, so werden alle Speicherinhalte sofort gelöscht 
(MEMORY LOST). Dieser Kontrollwert wird während eines laufenden Pro- 
gramms vom Betriebssystem nicht geprüft. Sobald das Programm jedoch 
angehalten wird oder selbsttätig anhält, muß der Inhalt von Register c 
unbedingt wieder den richtigen Kontrollwert enthalten. Während 
Register c die Zahl 7 enthält, darf das Programm daher keinesfalls ange- 
halten werden (Zeilen 40 bis 44). 


Zeile 41 überträgt den Inhalt der ersten 7 Bytes des Alpharegisters 
(Register M) in das X-Register. Dies sind genau die 7 Bytes, die als 
Programmbefehle eingegeben wurden. Zeile 42 speichert diese in das 
Datenregister mit der relativen Adresse, die im LastX-Register angegeben 
ist. Da der Curtain auf 000 gesetzt wurde, die relative Adresse (Daten- 
registeradresse) also gleich der absolute Adresse ist, ist das durch 
STO IND L angesprochene Register das Programmregister entsprechend 
der errechneten Rücksprungadresse aus Register b. Die Zeilen 43 bis 45 
stellen im Register c wieder den alten Zustand her, bringen die 7 in 
Register Y und den letzten Eingabewert in Register X. In Zeile 47 wird 
die absolute Adresse im LastX-Register um eins verringert (zur 
Vorbereitung der Eingabe der nächsten Programmbefehle) und falls der 
letzte Befehl eingegeben wurde, also eventuell noch weitere Eingaben 
gewünscht werden, wird erneut zur Eingaberoutine (LBL 00) verzweigt. 


Die Auffüllung der nicht benötigten Bytes mit Null-Bytes, bis die Anzahl 
von 7 erreicht ist, ist erforderlich, damit Mehr-Byte-Befehle, die teilweise 
in einem Register und in dem nächsten Register gespeichert werden, 
lückenlos aneinander anschließen. 


Sofern keine Eingaben mehr gemacht werden, wird der Sprungbefehl in 
Zeile 49 nicht ausgeführt, es ertönt BEEP und das END bewirkt den 
Rücksprung ins aufrufende Programm. Dort wird also der Befehl STOP 
noch ausgeführt, und der Programmzeiger wird auf das erste Pufferbyte 
positioniert. 
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Entscheidend zum Verständnis der Funktionsweise des Programms "LB" 
ist, daß zunächst nacheinander die Bytewerte der gewünschten Pro- 
grammbefehle im Alpharegister gespeichert werden. Dann wird das 
Betriebssystem des Rechners durch eine Manipulation des Registers c 
dazu veranlaßt, ein Programmregister vorübergehend als Datenregister zu 
behandeln, damit die eingegebenen Werte dort gespeichert werden können. 
So ist es möglich, mit Hilfe des Programms "LB" jede denkbare Bytefolge 
als Programmbefehl zu laden. Natürlich können auf diese Weise auch 
normale Programmbefehle geladen werden; dies empfiehlt sich besonders 
bei solchen Befehlen, die recht umständlich einzugeben sind. Enthält ein 
einzugebendes Programm einige synthetische Befehle, so sollte man zu- 
nächst nur diese direkt hintereinander in einem Arbeitsgang mit "LB" 
eingeben und anschließend die normalen Befehle wie üblich einfügen. 


5.2 "LB" - Load Bytes Il 32+LBL 62 
33 .... 
34 RCL c 
35 <> ıL 
36 Xi» N 
37 ASHF 
Bl*LBL "LB" 38 POSA 
82 CLST 39 AROT 
83 SIZE? 48 x>a? 
e4 2 41 CLX 
85 - 42 xXx=0? 
B6 X<BH? 43 ATOX 
87? CLX 44 ATOX 
88 PSIZE 45 16 
893 CLRG 46 MOL 
18 SF 22 47 LAST® 
43 Xt2 
11+LBL 88 47 %* 
12 STO IND 58 + 
va 51 DSE *& 
13 RDN 52 ENTERTt 
14 DSE 98 Ss3 ven 
15 FC? 22 =] 
16 GTO 823 54 256 
17 CLA 55 r 
13 7 56 TOR 
19 X<>Y Sr xX<> L 
58 MOn 
28+LBL @1 5? xTOR 
2ı FS?Cc 22 69 RCL 
22 STOP 861 STO as 
23 FC? z2 E22 <> L 
24 ., 863 K<y oc 
25 XTOR 64 CLST 
26 X<>Y 65 BEEF 
27 RDN 66 END 
28 DSE Y 
29 GTO Bi LEL’LE 
38 RcL L END 


31 GTO 88 113 BYTES 
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Eine andere Methode zum Laden synthetischer Programmbefehle verwendet 
das zweite "LB" Programm. Zur Benutzung dieses Programmes müssen 
keine Pufferbytes vorgegeben werden. Dadurch ist in diesem Punkte eine 
Fehlbedienung ausgeschlossen. Die Inhalte aller Datenregister werden 
jedoch durch das Programm gelöscht. Mit diesem Programm ist es nicht 
möglich, synthetische Programmbefehle nachträglich in ein bestehendes 
Programm einzugeben, diese Programmversion ist vielmehr dahingehend 
ausgelegt, möglichst schnell eine große Anzahl synthetischer Programm- 
befehle zusammenhängend eingeben zu können. Normale Programmbefehle 
können dann ebenfalls nachträglich eingefügt werden. 


Das Programm "LB" enthält eine synthetische Textzeile, deren Bytewerte 
nicht aus dem Ausdruck erkennbar sind (Zeile 53). Die Dezimal-Byte- 
Werte der Zeile sind: 


248, 192, 0, 11, 32, 176, 1, 105, 32. 


Mit dieser Textzeile darf das Programm nur mit einem HP-41CV, einem 
HP-41CX oder einem HP-41C mit 4 Memory Modulen oder mit einem Quad 
Modul benutzt werden. Sonst muß die Textzeile wie folgt geändert wer- 
den: 
HP-4IC + 3 MM 248, 192, 0, 11, 28, 176, 1, 105, 28 
HP-UIC + 2 MM 248, 192, 0, 11, 24, 176, 1, 105, 24 
HP-41C + 1 MM 248, 192, 0, 11, 20, 176, 1, 105, 20 
HP-YIC 248, 192, 0, 11, 16, 176, 1, 105, 16 


Programmbedienung "LB" (Load Bytes II): 


1. Zunächst ist sicherzustellen, daß die Textzeile entsprechend der 
Rechnerausstattung ist. 


2. Zur Speicherung der synthetischen Bytes stehen drei Register 
weniger zur Verfügung als Datenregister definiert sind. Deshalb muß 
mindestens SIZE 004 definiert sein. ( SIZE 019 erlaubt z.B. 
16 x 7 = 112 Bytes zu laden.) 


3.  XEQ "LB". 


4. Wenn das Programm stoppt, sind Dezimalwerte der zu ladenden Bytes 
einzugeben, danach R/S. Auf diese Weise kann entsprechend der Ka- 
pazität der Datenregister fortgefahren werden. Wenn BEEP ertönt, 
siehe 6; das Programm beendet automatisch die Eingabemöglichkeit, 
wenn alle Datenregister benutzt sind. In der Anzeige ist jeweils die 
letzte Eingabe sichtbar. 


5. Um die Eingaben zu beenden: R/S ( Ohne Eingabe ). 


6. Nach dem BEEP: GTO .. ! Danach ist SIZE 000 definiert (also keine 
Datenregister vorhanden). 
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Anschließend ist CAT 1 auszuführen, aber sofort mit R/S wieder anzu- 
halten, sobald das erste END in der Anzeige erscheint. Dann können im 
Programm-Modus mit SST die eingegebenen Programmbefehle angesehen 
werden. 


Nach dem BEEP muß unbedingt GTO .. ausgeführt werden! Deshalb sollte 
das Flag 26 nicht gelöscht werden. Die Stackregister und das Alphare- 
gister sollten während der Eingabe nicht verändert werden. 


Dieses Programm "LB" hat teilweise eine andere Funktionsweise als das 
vorher vorgestellte. In der Eingabeschleife (LBL 01) wird zwar genau wie 
im vorigen Programm Byte für Byte entsprechend der Eingabe im Alphare- 
gister zwischengespeichert. Sobald jedoch 7 Bytes eingegeben worden 
sind, werden diese in einem Datenregister gespeichert (Zeile 30, 31 
und 12). Wird das Programm gestartet, wird zunächst die Anzahl der 
definierten Datenregister um zwei herabgesetzt. Dies ist erforderlich, um 
sicherzustellen, daß in jedem Fall unterhalb des .END. mindestens zwei 
freie Register vorhanden sind. Dann werden alle Datenregister gelöscht 
und die relative Adresse des höchsten Datenregisters in Register 00 ge- 
speichert (Zeile 12 in Verbindung mit Zeile 14). Die jeweils 7 einge- 
gebenen Bytes werden in Datenregister mit absteigender Adresse bis ein- 
schließlich Register 01 gespeichert. 


Anschließend, oder falls keine Eingaben mehr gemacht werden, wird nach 
LBL 02 verzweigt. Dort wird bis einschließlich Zeile 50 aus dem Inhalt des 
Statusregisters c die absolute Adresse des .END. errechnet. Der Wert 
wird um 1 vermindert (Zeile 51). Mit Hilfe der Textbytes aus Zeile 53 
wird nun ein neuer Inhalt für das Statusregister c aufgebaut. Es wird 
festgelegt, daß es keine Datenregister gibt. Damit wird erreicht, daß die 
Datenregister, in die die Programmbefehle eingegeben wurden, vom Be- 
triebssytem des Rechners als Programmregister erkannt werden. Da aber 
in den globalen Programm-Labeln in Verbindung mit den END-Befehlen 
ausgehend vom unteren Ende des Programmregisterbereichs (.END.) eine 
wichtige Informationskette gespeichert ist, muß noch erreicht werden, daß 
diese Kette funktionsfähig bleibt. Das wird in dem Programm "LB" da- 
durch erreicht, daß in Register c eine um eins zu niedrige Adresse für 
das .END. gespeichert wird. Bei dem durch GTO .. ausgelösten Packen 
des Programmspeichers wird diese gesamte Informationskette wieder neu 
aufgebaut, da das .END. tatsächlich nicht an der angegebenen Adresse 
gefunden wird. Wird nach Ablauf des Programms nicht sofort GTO .. 
ausgeführt, ist kein Zugriff mehr auf die gespeicherten Programme 
möglich; eventuell ist MEMORY LOST die Folge. 


Die ersten drei Bytes der Textzeile (192, 0, 11) ergeben als Programm- 
befehl ein END. 
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Dieses END wird zuletzt an die eingegebenen Bytes angehängt, um die 
Eingaben als eigenständiges Programm im CAT 1 erscheinen zu lassen 
(Zeilen 60 und 61). 


Das Programm "LB" belegt 113 Bytes. Es kann aber trotzdem auf einer 
Magnetkartenspur untergebracht werden, da das END nicht auf der 
Magnetkarte gespeichert werden muß. 


Mit normalen Programmbefehlen ist es meist nicht möglich, dieselben 
Effekte zu erhalten, die man mit der synthetischen Programmierung 
erzielen kann. Dies haben die beiden Programme "LB" gezeigt. Es ist aber 
auch möglich, mit normalen Programmbefehlen ungewöhnliche Effekte zu 
erzielen. Mit den folgenden Programmbeispielen wird das aufgezeigt. 


5.3 "--" - Laufschrift, normal 
5.4 N"--" - Laufschrift, synthetisch 
Bil+LEL "--" 
GBi+LBL "--" B2 RCL d 
82 5F 25 83 AVIEN 
63 AYIELH 64 STO cd 
84 SF 29 85 CLX 
B8S5+LEL du B6+LBL 54 
B& R-F 87 R-F 
a7 P-R 83 F-R 
a5 GTO au a9 GTO 85 
a3 END 18 END 
WEL?-- LBEL"<- 
END EHD 
i2 BYTES 28 EYTE=S 
Die beiden Programme "--" haben die gleiche Wirkung: Sie dienen dazu, 


eine Laufschrift während des Programmablaufs in der Anzeige zu er- 
zeugen. Darüber findet man im Benutzerhandbuch des HP-41 keine 
Information. 


Um die Funktion von "--" zu erkennen, ist ein beliebiger Text in das 
Alpharegister einzugeben und das Programm zu starten. Dabei muß 
Flag 21 gelöscht sein, da sonst AVIEW die Programmausführung anhält. 
Das Phänomen der Laufschrift ist darauf zurückzuführen, daß durch 
AVIEW eine Meldung im Display angezeigt wird, aber das entsprechende 
Flag 50 künstlich gelöscht wird. Deshalb wird die aus dem Alpharegister 
stammende Display-Anzeige für das Programmausführungszeichen gehalten 
und bei jedem Labelsprung um ein Zeichen nach rechts in der Anzeige 
verschoben. 
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Durch den Befehl AVIEW wird Flag 50 zunächst gesetzt; dann aber in dem 
ersten Programm durch den fehlerhaften Befehl SF 99 gelöscht, um eine 
Fehlermeldung in der Anzeige vorzubereiten. Da vorher aber Flag 25 zur 
Unterdrückung der Fehleranzeige gesetzt wurde, kommt es nicht zu der 
Fehleranzeige, und das Phänomen der Laufschrift tritt auf. R-P und P-R 
wurden nur eingefügt, um den Labelsprung zu verlangsamen. 


In der zweiten Programmversion wird der gleiche Effekt mit synthetischen 
Mitteln erzeugt. Im Statusregister d sind sämtliche Flagzustände ge- 
speichert. Diese werden durch RCL d in das X-Register übertragen, 
solange Flag 50 noch gelöscht ist. Dann wird durch den Befehl STO d der 
ursprüngliche Zustand wieder hergestellt, also Flag 50 wieder gelöscht, 
obwohl sich eine Anzeige im Anzeige-Display befindet. Somit hält das 
Betriebssystem wieder den Inhalt des Displays für das Programmaus- 
führungszeichen, das bei jedem Labelsprung um ein Zeichen nach rechts 
verschoben wird. 


Dieses kleine Anwendungsbeispiel hat gezeigt, daß zur Erreichung unge- 
wöhnlicher Effekte nicht unbedingt Synthetik erforderlich ist. Es gibt je- 
doch viele Aufgaben, die nur mit Hilfe der Synthetik erledigt werden 
können. Zu diesen gehören z.B. die für die "LB"-Programme erforder- 
lichen Curtainverschiebungen. Aber Curtainverschiebungen sind seit der 
Einführung des IL Development Moduls nicht mehr unabdingbare Voraus- 
setzung der synthetischen Programmierung. 


Die synthetische Programmierung ist in letzter Zeit durch das CCD Modul 
weiter entscheidend vereinfacht worden. Mit dem CCD Modul ist es 
möglich, synthetische Befehle ganz 'normal' auszuführen oder zu pro- 
grammieren. Die Bedienung ist dabei so einfach und logisch, daß man sich 
kaum noch vorstellen kann, wie es vorher war. Das CCD Modul bietet für 
die Synthetik wirklich alles, was man sich nur wünschen kann. Es wurde 
von Mitgliedern des deutschen Anwenderclubs CCD (Computerclub 
Deutschland e.V.) programmiert. Die Bezugsquelle ist im Anhang 
angegeben. 
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6 BARCODES 


Der Barcode-Leser ist ein vorzügliches Hilfsmittel um umfangreiche Pro- 
gramme schnell, bequem und sicher in den HP-41 zu übertragen. Außer- 
dem kann hierbei das Papier als billiges Speichermedium genutzt werden. 
Als Nachteil muß man jedoch in Kauf nehmen, daß die Herstellung der 
Barcodes eigener Programme nur mit erheblichem Aufwand möglich ist. 


Der Einstieg in die synthetische Programmierung wird durch den Barcode- 
Leser wesentlich vereinfacht, da alle grundlegenden Programme zur 
synthetischen Programmierung als Barcodes veröffentlicht wurden. 


6.1 "BA" - Barcode Analyser 


Das Programm "BA" analysiert die einzelnen 


Bl*LBL "BA" Bytes aller Barcode-Typen. Das Programm 
a2 WNDSCN erfordert SIZE 017. Nach dem Programmstart 
a3 E23 erscheint bei angeschlossenem Barcode-Leser 
84 7 in der Anzeige 'W: READY'. Anschließend ist 
85 I5G # der zu analysierende Barcode einzulesen. In 


der Anzeige des Rechners erscheint jetzt 1/ 


06+LBL aa und der Wert des ersten Bytes. Mit R/S ist 


>. 
BE RCL d fortzufahren, um die Werte der folgenden 
a9 FIN 9 Bytes in die Anzeige zu bringen. Zu be- 
18 ARCL achten ist dabei jedoch, daß die Funktion 
11 “ WNDSCN keine Prüfung des gelesenen Bar- 
12 ARCL IND codes vornimmt, so daß Lesefehler nicht zu 
EN: ? einer Fehlermeldung führen. Die Funktion 
14 RDH WNDSCN bewirkt nicht, daß die gelesenen 
15 PROMPT Informationen ausgeführt werden, statt 
16 ISG ®& dessen wird der Wert jedes gelesenen Bytes 
17 GTO ao in ein Datenregister gespeichert. Ein 
18 CLST Barcode-Analyseprogramm ist besonders 
17 END nützlich, wenn man selbstgefertigte Barcodes 
LEL’"EN prüfen will (Fehlerhafte Barcode-Befehle 
END können unter Umständen sofort zu MEMORY 
33 BYTES LOST führen, ohne daß eine Fehlermeldung 
erfolgt). 


Grundlage des Programms "BA" ist die Funktion WNDSCN, die eingelesene 
Bytewerte fortlaufend in Datenregister speichert. Außerdem legt WNDSCN 
die Anzahl der gelesenen Bytes im X-Register ab. 
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Mit diesen Informationen wird in den folgenden Programmzeilen die 
Ausgabe formatiert. Die Befehlsfolge RCL d ... STO d bewirkt, daß trotz 
ses Ausgabeformates (FIX 0) der ursprüngliche Display-Modus erhalten 
dleibt. Hierzu kann ebenfalls RCLFLAG ... STOFLAG verwandt werden. 


Der in dem Programm "BA" enthaltene Befehl E3 (= 1.000) hat die gleiche 
Funktion wie der üblicherweise verwendete Befehl 1 E3. Er gehört zu den 
sogenannten Kurzformexponenten, die in einem Programm die gleiche 
Funktion wie die entsprechenden normalen Befehle haben. Sie sind jedoch 
jeweils ein Byte kürzer und werden schneller ausgeführt. Es sind die 
einzigen synthetischen Befehle, die mit dem Barcode-Leser direkt als 
Einzelbefehle in ein Programm eingelesen werden können. Deshalb sind sie 
auf der folgenden Seite abgedruckt. Alle übrigen synthetischen Befehle 
sind nur als Bestandteil eines Programmes mit dem Barcode-Leser einzu- 
lesen. Dabei können natürlich gerade komplizierte synthetische Programme 
sicher und schnell eingelesen werden. 


Trotzdem können mit dem Barcode-Leser noch einige Besonderheiten er- 
reicht werden; exemplarisch dafür soll hier das Zuordnen einer Funktion 
oder eines Programmes mit dem Tastencode -31 (Taste SHIFT/SHIFT) 
gezeigt werden. Eine solche Zuordnung, die normalerweise nur mit 
synthetischen Hilfsprogrammen vorgenommen werden kann, ist problemlos 
durch Einlesen des entsprechenden Barcode-Befehls zu erreichen. 


Dazu ist zunächst ein beliebiges Programm mit dem Global-Label "SW" zu 
bezeichnen. Nach Einlesen des Barcode-Befehls, der mit ASN "SW" -31 
bezeichnet ist, ist der Programmstart dieses Programmes der Taste 
SHIFT/SHIFT zugeordnet. Nach zweimaligem Drücken der SHIFT-Taste 
startet das gewünschte Programm. Man hat mit diesem Barcode-Befehl also 
eine zusätzliche Tastenzuordnung erreicht, die mit normalen Mitteln nicht 
möglich ist. Ist kein entsprechendes Global-Label "SW" vorhanden, aber 
das Time Modul eingesetzt, wird die Stoppuhr-Funktion der Taste 
SHIFT/SHIFT zugeordnet. 


Mit dem HP-41IC und dem HP-4ICV ist diese Zuordnung nicht ohne wei- 
teres zu löschen. (CLKEYS würde sämtliche Tastenzuordnungen löschen.) 
Der HP-4ICX bietet jedoch innerhalb des CAT 6 die Möglichkeit, jede 
einzelne Zuordnung zu löschen; dies ist auch für den Tastencode -31 
möglich. Zur Löschung der Zuordnung kann der mit CLEAR ASN -31 
bezeichnete Barcode-Befehl eingelesen werden. 


Wer sich dafür interessiert, eigene Barcodes herzustellen, findet in den 
Veröffentlichungen der Anwenderclubs (PPC und CCD) entsprechende 
Hinweise. Die Anschriften dieser Anwenderclubs sind in den Literatur- 
hinweisen im Anhang genannt. 


E 
11111111111) 
E1 
INMMINNINNNIN 
E2 
11111111) 
E3 
INN 
Eu 
11111111111] 
E5 
111111111) 
E6 
1111111) 
E7 
1111111111) 
Ea 
111111111111] 
E9 
11111111111) 


ASN "SW" -31 
1111111111111) 


E-1 
111111111) 
E-2 
111111111111 
E-3 
11111111) 
E-4 
11111111111) 
E-5 
1111111111) 
E-6 
1111111711) 
E-7 
1111111 
E-8 
1111111111) 
E-9 
111111111) 


CLEAR ASN -31 
1111111111) 
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=” PROGRAMMZEIGERMANIPULATIONEN 


„m die folgenden Programme "DP" und "PD" verwenden zu können, 
„üssen zunächst die Tastenzuordnungen RCL b (Dezimal 144, 124) 
und STO b (Dezimal 145, 124) vorgenommen werden. Dazu ist ein 
synthetisches Tastenzuordnungsprogramm, wie z.B. das in Kapitel 10 
dargestellte Programm "KA", zu benutzen. Der Befehl STO b kann auch 
aus einem Programm mit SST ausgeführt werden und braucht dann nicht 
als Tastenzuordnung gespeichert zu sein. 


7.1 "DP" - Dezimaladresse - Programmzeiger 
7.2 "PD" - Programmzeiger - Dezimaladresse 
B1+LEL "PI" 

B1+LBL "DF"“ a2 CLA 
82 ENTERT 83 X7> IC 
83 CLA a4 POZA 
84 7 85 ARUOT 
85 MOD B5 >07 
86 X%<>Y 07 CL= 
8? LASTX 88 Kr? 
88 7 89 ATOM 
89 RCL = 18 ATOM 
198 16 11 RCL = 
11 ST+ T 12 16 

12 Xtz 13 MOD 
13 MOD 14 LAST“ 
14 S<>Y 15 ST“ Z 
15 LAST® 18 xt2 
186 7 17 * 

17 Rt 18 Rt 

18 + 19 + 

19 XxTOor 28 7 

28 &S>YV zii * 

21 XTOR 22 + 

22 RCL L 23 INT 
23 END 24 END 
LBL’'DF LEL"PD 
END END 


36 BYTES 33 BYTES 
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Die Anwendungsmöglichkeiten für die Programme "DP" und "PD" sind sehr 
vielseitig: Man kann jede absolute Adresse berechnen, zu jeder absoluten 
Adresse springen, insbesondere auch zwischen Mehr-Byte-Befehle, und 
man kann Byte-Abstände berechnen. Es ist ferner möglich, einzelne 
synthetische Befehle herzustellen oder zu verändern. Außerdem kann man 
Tastenzuordnungen verändern und synthetische Zuordnungen herstellen. 
Hierbei ist aber eine sehr sorgfältige Ausführung erforderlich, da jedes 
Fehlverhalten schnell zu MEMORY LOST führen kann. 


Das Programm "DP" rechnet eine absolute Byte-Adresse in den zugehöri- 
gen Wert für einen STO b-Befehl um. Dabei wird nicht nur eine absolute 
Registeradresse, sondern für jedes Byte eine eigene Adresse ermittelt. 
Das Programm "PD" errechnet aus dem Wert, den man aus einem RCL b- 
Befehl erhält, die absolute Byte-Adresse. Beide Programme sind für den 
gesamten Rechnerregisterbereich anwendbar, auch für Adressen im 
X-Functions Modul und im X-Memory Modul. 


Im Register b wird in den Bytes 0 und 1 der Programmzeiger gespeichert. 
Dieser Zeiger gibt das Byte an, das der Rechner im PRGM-Modus zuletzt 
verarbeitet hat. Wenn man in den PRGM-Modus schaltet, sieht man das 
nächste Byte immer als Programmbefehl. Dies gilt auch dann, wenn der 
Programmzeiger so manipuliert wurde, daß er auf ein Datenregister, ein 
Stackregister oder ein Alpharegister gerichtet ist. Man kann daher durch 
Manipulation des Programmzeigers jeden Rechnerinhalt als Programm aus- 
führen lassen, sogar im Extended Memory Bereich. Man kann sich auch 
jedes einzelne Byte nur ansehen und so den gesamten Rechnerinhalt 
lesen. Ferner ist es möglich, im PRGM-Modus einzelne Bytes zu ver- 
ändern, auch wenn man sich nicht im Programmspeicherbereich befindet. 


Will man an den Anfang eines Registers springen, so muß man die Re- 
gisteradresse mit 7 multiplizieren, weil je Register 7 Bytes gespeichert 
werden und dann "DP" ausführen. Man erhält dann einen meist unles- 
baren Wert im X-Register. Führt man dann den einer Taste zugeordneten 
Befehl STO b aus, springt der Programmzeiger sofort zu der berechneten 
Adresse. Schaltet man dann in den PRGM-Modus, so sieht man (eventuell 
nach Ausführung von SST) den Wert des berechneten Bytes als Pro- 
grammbefehl. Dabei wird die Programmzeilennummer nicht berechnet. Sie 
weicht daher oft von der Zeilennummer im Programmlisting ab. 


Durch Eingabe des Dezimalwertes einer absoluten Adresse, danach 
Ausführung von "DP" und STO b, positioniert man den Programmzeiger 
an jede gewünschte Stelle. Bei Ausführung des Befehls STO b darf der 
Programmzeiger nicht auf eine Programmzeile innerhalb eines Software- 
Moduls gerichtet sein. 


Zur Berechnung einer absoluten Byte-Adresse innerhalb des Programm- 
speichers ist der Programmzeiger an die gewünschte Stelle zu bringen 
(im PRGM-Modus mit SST). Nach Verlassen des PRGM-Modus ist RCL b 
auszuführen. Aus dem erhaltenen Wert im X-Register errechnet "PD" die 
absolute Byte-Ädresse. 
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„m den Byte-Abstand zweier Befehle im Programmspeicherbereich zu be- 
rechnen, sind nach dieser Methode beide Adressen zu berechnen und 
anschließend zu subtrahieren. Die gesamte Länge eines Programms kann 
mit dem Drucker durch CAT 1 (TRACE-Modus) oder mit dem HP-41CX 
durch CAT 1 ermittelt werden. 


Wem diese Möglichkeiten nicht zur Verfügung stehen, der kann die ge- 
samte Länge eines Programmes wie folgt berechnen: Differenz der 
Adressen des Programmanfangs und des im CAT 1 unmittelbar folgenden 
Programmanfangs. An den jeweiligen Programmanfang gelangt man durch 
Ausführen von CAT 1 und falls kein Gilobal-Label in Zeile 01 des je- 
weiligen Programms steht, indem man dann noch GTO.000 ausführt. 


Mit Hilfe der Tastenzuordnungen RCL b und STO b und den beiden Pro- 
grammen "DP" und "PD" ist es möglich, einzelne synthetische Programm- 
befehle zu erzeugen. Als Beispiel soll hier erläutert werden, wie der 
Befehl RCL d (dezimal 144, 126) erzeugt werden kann. 


An die gewünschte Stelle des Programms gibt man RCL 97 als Programm- 
schritt ein. Danach ist der Programmspeicher zu packen. Man berechnet 
dann die absolute Byte-Adresse dieses Befehls RCL 97, zieht von dem 
errechneten Ergebnis I ab und führt "DP" und STO b aus. Nun [eventu- 
ell SST) sieht man im PRGM-Modus den Befehl ABS. Dies ist das zweite 
Byte von RCL 97 als Ein-Byte-Befehl gelesen. Diesen Befehl kann man 
nach der ganz normalen Methode in AVIEW ändern. Wenn man sich dann 
den Programmschritt nochmals ansieht (SST, BST), ist aus RCL 97 der 
Befehl RCL d geworden! So ist aus einem nichtsynthetischen Zwei- 
Byte-Befehl ein synthetischer Zwei-Byte-Befehl geworden. In Pro- 
grammen, die im Extended Memory stehen, dürfen jedoch keine Ver- 
änderungen nach dieser Methode vorgenommen werden. 


Nach einem ganz ähnlichen Verfahren ist es auch möglich, Tastenzuord- 
nungen zu verändern. Die Tastenzuordnungen von Befehlen aus CAT 2 
und CAT 3 werden in den Registern mit absoluter Adresse 192 und 
größer gespeichert. Alarmdaten des TIME Moduls werden dort ebenfalls 
gespeichert. In diesem Registerbereich muß man daher sicher sein, daß 
man die Tastenzuordnungen tatsächlich erkannt hat, bevor man Verän- 
derungen vornimmt. Dann darf man nur genau so viele Bytes einfügen, 
wie man vorher gelöscht hat. Sonst erhält man sofort MEMORY LOST. Da 
man normalerweise nicht genau weiß, wie viele Zuordnungsregister belegt 
sind, und SST Adressen herabspringt (wie es dem Programmablauf ent- 
spricht), sollte man zum Sprung in die Zuordnungsregister am besten eine 
etwas zu hohe Registeradresse verwenden. BST ist sehr langsam und 
manchmal gar nicht möglich. Obwohl zwei Zuordnungen in einem Register 
gespeichert werden können, kann man einfach zu 192 die Anzahl der 
Zuordnungen addieren, das Ergebnis mit 7 multiplizieren und dies als 
absolute Adresse benutzen. Es müssen allerdings einige freie Register 
vorhanden sein, damit man nicht in den Bereich des letzten Programms 
gerät. 


38 


Mit der errechneten Adresse ist dann "DP" und anschließend STO b aus- 
zuführen. Im PRGM-Modus erreicht man nach dem ersten SST den Anfang 
des höchsten Zuordnungsregisters, sofern keine Alarmdaten gespeichert 
sind. Andernfalls muß man mit SST zunächst alle Alarmdaten durchlaufen, 
die jetzt natürlich als ungeordnete Programmbefehle erscheinen. Fährt man 
mit SST immer weiter fort, so gelangt man schließlich an den Anfang des 
ersten Programms des CAT 1. 


In den Zuordnungsregistern werden auch die Tastencodes mitver- 
schlüsselt. Die zugeordneten Funktionen sind aber zwischendurch am 
normalen Aussehen, wie sie in einem Programm erscheinen würden, 
erkennbar. Ein-Byte-Befehle werden durch LBL 03 und anschließend den 
Befehl verschlüsselt. Will man eine synthetische Zuordnung erzeugen, so 
muß man zunächst eine beliebige Zuordnung vornehmen und diese dann 
verändern. 


Beispiel: Die Zuordnung RCL b soll erreicht werden. Man ordnet einer 
Taste die bisher keiner Taste zugeordnete Funktion BEEP zu. Dann 
springt man mit der nach der angegebenen Methode errechneten Adresse, 
XEQ "DP" und anschließendem STO b in die Zuordnungsregister und 
sucht im PRGM-Modus den Befehl BEEP mit SST. In der 'Programmzeile' 
davor müßte LBL 03 stehen. Dann wird BEEP gelöscht, es erscheint in 
der Anzeige LBL 03. Dieser Befehi ist auch noch zu löschen und RCL 97 
einzugeben. Dann berechnet man die Adresse dieses Befehls RCL 97. Wie 
beschrieben ist dann das zweite Byte von RCL 97, das dann als ABS 
erscheint, in MEAN zu ändern. Dazu ist unbedingt zuerst ABS zu löschen 
und danach MEAN einzufügen. Die ursprüngliche Zuordnung BEEP ist so 
in RCL b geändert worden. Anschließend kehrt man mit GTO .. wieder in 
den Programmspeicher zurück. 


7.3 "XF" - Programm im X-Functions Modul ausführen 


Das nebenstehende Programm "XF" nutzt eine 


BleLBL "HF" weitere Möglichkeit einer Programmzeiger- 


2 " manipulation. In Zeile 02 dieses Programms 
83 ASTO Bb ist ein Zeichen mit dem Zeichencode 190 im 
94 END Alpharegister enthalten. Dies kann aus dem 

Ausdruck nicht erkannt werden. (Statt 
LBL"XAF Zeile 022 kann auch die Befehlsfolge 190, 
N re XTOA eingesetzt werden.) "XF" bewirkt eine 


Verzweigung des Programmzeigers auf das im 
Extended Memory als erstes File gespeicherte 
Programm. 


Mit diesem kurzen Programm ist es möglich, das erste im Extended Memory 
gespeicherte Programm auszuführen, ohne daß es vorher in den normalen 
Programmspeicher übernommen werden muß. 
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Dabei ist jedoch folgendes zu beachten: Ein Unterprogrammaufruf eines 
Programms im normalen Programmspeicher und anschließender Rücksprung 
in das Extended Memory ist nicht möglich. In dem im Extended Memory 
auszuführenden Programm darf nicht der Befehl PSIZE verwendet werden. 
Wenn das Programm anschließend mit GETP wieder in den Hauptspeicher 
zurückgeladen werden soll, muß es vorher im Hauptspeicher ablaufen, 
damit alle Sprungbefehle innerhalb des Programms einmal ausgeführt 
worden sind. Andernfalls ist ein Zurückrufen des Programms in den 
Hauptspeicher nicht mehr möglich (es erscheint die Fehlermeldung 
CHKSUM ERR). 


Bei Ausführung der Funktionen SIZE oder PSIZE werden alle Programme 
im Programmspeicher verschoben, sofern sich tatsächlich eine Änderung 
der Anzahl der Datenregister ergibt. In diesem Falle erhalten also alle 
Programmbefehle eine neue absolute Adresse. Wird PSIZE innerhalb eines 
Programms ausgeführt, so erhält deshalb auch der nachfolgende Pro- 
grammbefehl eine andere absolute Adresse. Damit das Programm aber mit 
dem nachfolgenden Befehl fortgesetzt wird, ändert das Betriebssystem 
aufgrund der Ausführung von PSIZE die in Register b gespeicherte Pro- 
grammzeigerinformation entsprechend. Tritt der Befehl PSIZE innerhalb 
eines im erweiterten Speicherbereich ausgeführten Programmes auf, und 
ändert sich dadurch die Anzahl der Datenregister tatsächlich, wird das 
Programm wegen der rechnerischen Veränderung des Programmzeigers 
nicht normal weiter ausgeführt. (lm Extended Memory enthaltene Register 
behalten immer die gleichen absoluten Adressen.) 


Wird im erweiterten Speicherbereich des X-Functions Moduls ein Programm 
ausgeführt, das bei gelöschtem Alpharegister den Befehl PCLPS enthält, 
werden dadurch alle Programme im Programmspeicher gelöscht; das aus- 
führende Programm im erweiterten Speicher wird jedoch nicht gelöscht. 
Der Befehl PCLPS, ausgeführt von einem Programm im erweiterten Spei- 
cher, jedoch mit der Angabe eines Programmnamens aus CAT 1 im Alpha- 
register, löscht Programme, als würde er von der Tastatur ausgeführt. 
Die Ausführung des Programms im erweiterten Speicher wird jedoch nicht 
fortgesetzt. 


Mit Hilfe des Programms "XF" läßt sich folgendes Verhalten des 
X-Functions Moduls erkennen: Ist im erweiterten Speicherbereich nur ein 
Programm gespeichert, (EMDIR oder CAT 4 zeigen also nur dieses Pro- 
gramm an) und wird dieses Programm mit PURFL gelöscht, wird es nicht 
tatsächlich aus dem erweiterten Speicherbereich entfernt. Trotzdem wird 
DIR EMPTY angezeigt! Solange im erweiterten Speicher des X-Functions 
Moduls nichts abgelegt wird, kann man dieses scheinbar gelöschte Pro- 
gramm weiterhin mit "XF" ausführen. 


Wie nützlich es sein kann, ein im erweiterten Speicherbereich des 
X-Functions Moduls abgelegtes Programm direkt auszuführen, kann an 
dem im Kapitel 11 dargestellten Finanzprogramm erkannt werden: Dieses 
Finanzprogramm kann z.B. als erstes Programm im erweiterten Speicher 
mit "XF" ausgeführt werden. 
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Die direkten Zugriffsmöglichkeiten auf die Label A bis J im USER-Modus 
bleiben erhalten. Der Programmzeiger bleibt innerhalb des Programms im 
erweiterten Speicherbereich, solange die Programmausführung nicht mit 
END angehalten wird. 


Ordnet man das Programm "XF" derselben Taste zu, der das im erwei- 
terten Speicherbereich abgelegte Programm zugeordnet war, so ist im 
USER-Modus kein Unterschied in der Bedienung festzustellen. Erforder- 
liche Zahleneingaben sind in allen Stack-Registern möglich; lediglich das 
Alpharegister kann bei Aufruf mit "XF" nicht für Eingaben verwandt 
werden. 


Das Prinzip von "XF" ist auch für andere Bereiche im X-Functions Modul 
oder X-Memory Modul anwendbar; dabei muß man jedoch darauf achten, 
daß das aufgerufene Programm vollständig in einem Modul enthalten ist. 


3 DAS TIME MODUL 


Eine besonders vielseitige und deshalb sehr beliebte Ergänzung des HP-4 
st das Time Modul. Es bietet Befehle aus den Bereichen Zeit- und 
Datumsfunktionen, Stoppuhrfunktionen, Kalenderrechnungen und Alarm- 
"funktionen. Zu allen Anwendungsbereichen werden im folgenden Kapitel 
Programmbeispiele vorgestellt. 


8.1 "TD" - Tondauer 


Das Programm "TD" ist ein weiteres Anwen- 


dungsbeispiel für die im vorigen Kapitel be- ah nm? 
handelte Programmzeigermanipulation. Es 
führt entsprechend der Eingabe bei Pro- 03 XTon 
grammbeginn einen Ton aus und mißt die 84 "H 
Tondauer unter Verwendung der Funktion aJökeähal" 
TIME des Time Moduls. Entscheidend dabei e5 ES 
ist, daß mit Hilfe der synthetischen “ ENT BD 
Programmierung insgesamt 128 nominell 88 CLX 
verschiedene Töne erzeugt werden können, 03 E4 
von denen jedoch einige sowohl in Tonhöhe 18 * 
als auch Tondauer identisch sind. Während 11 RCL 4 
der Ausführung von "TD" sollte kein iz FIX 6 
Drucker {oder IL Modul) angeschlossen sein, 13 ARCL z 
da sich sonst eine falsche Zeitrechnung - GE 
. . * . 4 ” Z 
ergibt. Um mit einem Programm die Aufgabe 18 ARCL *% 
zu erfüllen, je nach Eingabe verschiedene 17 STO d 
Töne, also verschiedene Programmbefehle 18 x<> T 
auszuführen, muß das Programm wieder ein 19 AVIEN 
Programm erzeugen. Das geschieht in "TD" 28 END 
dadurch, daß die Programmbefehle zunächst LEL"TD 
im Alpharegister gebildet werden und das END 
Alpharegister später durch Programmzeiger- 59 BYTES 
manipulation als Programmteil ausgeführt 
wird. 


Aus diesem Grunde enthält das Programm auch in Zeile 02 und Zeile 04 
unlesbare bzw. sinnlos erscheinende Textteile. Diese Programmzeilen, die 
nur durch synthetische Programmierung eingegeben werden können, ent- 
halten folgende Dezimalwerte: 


Zeile 02: 243, 166, 156, 159 
Zeile 04: 253, 127, 166, 156, 113, 74, 23, 27, 28, 22, 65, 113, 145, 124 
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Wird das Programm "TD" mit der Eingabe 120 gestartet, erscheint, nach- 
dem der zugehörige Ton ausgeführt wurde, 120 __ 0,12 in der Anzeige. 
Diese Anzeige bedeutet, daß der Ton mit dem Dezimalwert 120 (im Pro- 
gramm als TONE P) 0,12 Sekunden dauert. 


Führt man das Programm "TD" mit SST in Einzelschritten aus, so ist zwar 
das errechnete Zeitergebnis nicht mehr korrekt, aber man kann sämtliche 
im Alpharegister verschlüsselte Programmbefehle einzeln erkennen. Dabei 
wird dann auch der zweimal verwendete Befehl TIME erkennbar. Das Pro- 
gramm "TD" benutzt also zur Messung der Tondauer nicht die Stoppuhr- 
funktion des Time Moduls, sondern die Differenz aus der angegebenen 
Zeit vor und nach Ausführung des Tons. Dabei ist eine Korrektur von 
0,07 Sekunden erforderlich, da die zweimalige Ausführung von TIME 
innerhalb eines Programmes diese Zeitdifferenz ergibt. 


Wegen der Vielzahl der verwendeten synthetischen Befehle empfiehlt es 
sich, "TD" mittels Barcode einzulesen oder das Programm nach Eingabe 
durch "LB" auf Magnetkarte dauerhaft zu speichern. Das Programm "TD" 
sollte nur mit Eingaben im Bereich von 0 bis 127 gestartet werden. Daß 
die Eingabe des Wertes E8 in Register b den Programmzeiger in das 
Alpharegister bringt, läßt sich mit dem im vorigen Kapitel vorgestellten 
Programm "PD" nicht nachvollziehen. Wer jedoch das PPC Modul besitzt, 
kann mit dem darin enthaltenen gleichnamigen Programm errechnen, daß 
der Wert E8 ins Register b gebracht, als absolute Byte-Adresse 56 
interpretiert wird. 


Die aufwendige synthetische Programmierung mit dem Umweg über das 
Alpharegister ergibt sich im Programm "TD" nur deshalb, weil das zweite 
Byte des Befehls TONE durch die Eingabe vorgegeben werden soll. Dieses 
Byte wird dann durch den Befehl XTOA (Zeile 03) in das Programm ein- 
gefügt. 


8.2 "BAT" - Batterienutzungsdauer 


B81+LBL "BAT Das Programm "BAT" zeigt eine einfache An- 
5 5 wendungsmöglichkeit der Stoppuhrfunktionen 

s= Eereiı des Time Moduls. Es dient dazu, die mit 
84 RUNSW einem Akkusatz verfügbare Rechenzeit zu 
ermitteln. Man setzt dazu einen vollgeladenen 

85+LBL a6 Akkusatz in den Rechner ein und läßt das 
86 FC? 49 Programm "BAT", am besten über Nacht, 
a7 GTO 88 laufen. Das Programm erfüllt dabei letztlich 
e3 STOPSW nur die Funktion, die Stoppuhr des Time 
Ts Ber Moduls anzuhalten, sobald durch Flag 49 eine 
1l"- abfallende Batteriespannung erkennbar wird. 
12 ATIME Die durch die Stoppuhr angezeigte Zeit wird 
13 ASTO *& dann über das Alpharegister formatiert, ins 
14 OFF X-Register gebracht, und der Rechner wird 


15 END abgeschaltet. 
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sach Wiedereinschalten des Rechners sieht man in der Anzeige die ver- 
*ügbare Rechenzeit für den entsprechend vollgeladenen Akkusatz in 
Stunden und Minuten. Durch die Befehle CLX, SETSW, RUNSW, ... , 
5STOPSW ist es also möglich, Programmlaufzeiten zu messen. Die 
Stoppuhrfunktionen des Time Moduls sind daher ein wichtiges Hilfsmittel, 
„m bei der Programmoptimierung die Schnelligkeit verschiedener Pro- 
srammversionen objektiv beurteilen zu können. 


3.3 "O" - Ostertermin 


; nt % De al+LBLl "u" 
Ein exzellentes Beispiel für Programmoptimie- a2 ENTERT 
rung durch Benutzung der Kalenderfunktion a2 DMY 
des Time Moduls bietet das nebenstehende 84 E6& 
Programm "O0", Autor dieses Programms ist B5 7 
Kari Pasanen, Jyväskylä, Finnland, En ar es 
Das Programm berechnet ohne Benutzung von se ee 
synthetischen Funktionen und ohne Be- 18 MOD 
nutzung von Datenregistern den Termin des 11 LASTXA 
Ostersonntags für jedes Jahr im Bereich 12 * 
1900 bis 2099. Damit die Anzeigeformatierung 13 6 
(Zeile 28 bis 30) wie vorgesehen arbeitet, = 30 
sollte mindestens FIX 3 (ENG 3, SCI 3) 18 MOD 
eingestellt sein. 17 28 
18 %<=YT? 
Basierend auf diesem Programm lassen sich 19 DSE 
alle beweglichen Festtage errechnen. Die 28 RDN 
Berechnung des Ostertermins erfordert ohne 21 DATE+ 
Verwendung der Kalenderfunktionen des 22 ENTERT 
; s 23 DOW 
Time Moduls etwa den vierfachen Programm- 24 CHS 
speicherplatz; außerdem ist die Verwendung 25 7 
einiger Datenregister erforderlich. 26 MOD 
27 DATE+ 
28 u ” 
29 ADATE 
38 AYVIEN 
31 END 


Das Time Modul bietet die Möglichkeit, Alarme zu speichern. Ein Alarm 
kann zur vorgegebenen Zeit entweder eine bestimmte Meldung auslösen, 
die Uhrzeit und das Datum anzeigen, eine Rechnerfunktion ausführen oder 
ein Programm starten. Je nach Wunsch kann dabei ein Wiederholungsin- 
tervall vorgegeben werden, Das Time Modul enthält aber nicht wie das 
X-Functions Modul einen zusätzlichen Speicherbereich, Die zur Spei- 
cherung der Alarmdaten benötigten Register werden innerhalb des 
Hauptspeicherbereichs in dem sogenannten I/O-Buffer belegt. 


u 


Der I/O-Buffer ist der Bereich zwischen dem .END. und dem Register mit 
der absoluten Adresse 192. In diesem Bereich werden auch die Tasten- 
zuordnungen für Funktionen aus CAT 2 und CAT 3 gespeichert. Die ins- 
gesamt 319 Register des Hauptspeicherbereichs des HP-41CV stehen als 
Gesamtheit für Datenregister, Programme oder als I/O-Buffer zur Ver- 
fügung. Die jeweils noch freien Register werden im PRGM-Modus z.B. 
nach Ausführung von GTO .. angezeigt (00 REG NN). Diese freien Re- 
gister werden sowohl bei Erhöhung der Anzahl der Datenregister, bei 
Eingabe weiterer Programmbefehle als auch bei der Speicherung neuer 
Tastenzuordnungen oder Alarme verbraucht. Es ist daher oft wünschens- 
wert zu wissen, wie viele Register mit Tastenzuordnungen oder Alarmen 
belegt sind. 


8.4 "A?" - Assignment- und Alarmregister Finder 


Im PPC Modul ist ein Programm "A?" enthalten, das die Anzahl der für 
Tastenzuordnungen benutzten Register angibt. Dieses Programm darf 
jedoch nicht benutzt werden, wenn im Bereich des I/O-Buffers andere 
Informationen als Tastenzuordnungen gespeichert sind. Alarmdaten würden 
z.B. unbrauchbar aber nicht gelöscht; die dafür gebrauchten Register 
könnten mit herkömmlichen Methoden nicht mehr nutzbar gemacht werden 
(Ausnahme: MEMORY LOST). 


B1+LBL "A?" a. 
a2 ı76 27 arcL 

[ 
83 XROM "E? ne 
SE 29 STO IND 

= 

Be ke 38 RDN 
a7 CLST ae 
a3 %=07 33 GTO 88 
er 34 ENTERTt 
11 7 


37 SID co 

38 ATOX 
14*LBL 68 ee 
15 RCL IND .. 

be 

Er 42+LBL 82 
I 43 INT 

44 + 
neue 45 END 
21 xX=8? 5 
22 GTO sl EB NE 
2 7 END 

77 BYTES 
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2zs Programm "A?" ermittelt, wie viele Register für Tastenzuordnungen 
rc für Alarme benutzt sind. Natürlich werden dabei Alarmdaten und 
”3stenzuordnungen nicht verändert. Nach der Programmausführung ent- 
-2.2 das X-Register die Anzahl der Register, die für Tastenzuordnungen 
rs Alarme insgesamt belegt sind; die Anzahl der benutzten Tastenzu- 
„dnungsregister ist im LastX-Register enthalten. 


-:eses Programm benutzt Funktionen aus dem X-Functions Modul und aus 
sem PPC Modul. Die Textzeile 23 enthält die Bytes: 242, 127, 240. Es 
„erden keine Datenregister benutzt. Das Programm arbeitet einwandfrei, 
„rabhängig davon, ob Alarme und/oder Tastenzuordnungen gespeichert 
s.nd oder nicht (also auch ohne das TIME Modul). "A?" darf nicht als 
erstes Programm im CAT 1 stehen; es muß mindestens ein END voraus- 
zehen, 


„m die folgende Programmbeschreibung nachvollziehen zu können, kann 
3as Programm mit SST in Einzelschritten ausgeführt werden; die Aus- 
*ührung darf jedoch nicht beendet werden, solange das Programm nicht 
pis zum Ende abgelaufen ist. 


Mit Hilfe des Programms "E?" aus dem PPC Modul wird zunächst die 
absolute Adresse des .END. berechnet. Ist diese 192, so verzweigt das 
Programm nach LBL 02 und die Programmausführung ist beendet (Er- 
gebnisanzeige = 0). Dieser Fall kann nur auftreten, wenn weder 
Tastenzuordnungen noch Alarme gespeichert sind und außerdem kein 
freies Register vorhanden ist. 


Für die eigentlich zu untersuchenden Fälle wird bis zur Zeile 12 eine 
Steuerzahl aufgebaut, die später im Programm mehrfach Verwendung 
findet (RCL IND Y, STO IND Z und ISG Y). Diese Steuerzahl gibt den 
maximalen Bereich der im I/O-Buffer zu untersuchenden Register an. Die 
errechneten relativen Registeradressen sind dabei um 16 geringer als die 
absoluten Registeradressen, da das in Zeile 13 aufgerufene Programm 
"OM" den Curtain auf die absolute Registeradresse 16 versetzt. "OM" 
übergibt dabei den früheren Inhalt des Registers c im X-Register. 


RCL IND Y in Zeile 15 bringt nun zuerst den Inhalt des Registers mit der 
absoluten Adresse 192 (176 + 16) ins X-Register. In den folgenden Pro- 
grammzeilen wird geprüft, ob das erste Byte dieses Registers 16 ist; 
trifft dies nicht zu, wird nach LBL 01 verzweigt. Das erste Byte eines 
Tastenzuordnungsregisters hat immer den Wert 240. Damit entspricht ein 
Wert aus einem Tastenzuordnungsregister nicht dem Zahlen- oder Alpha- 
format, wie es durch den Befehl RCL verarbeitet werden kann. Wird ein 
Wert, der weder dem Zahlen- noch dem Alphaformat entspricht, durch 
RCL angesprochen, wird dieser zunächst durch das Betriebssytem des 
Rechners 'normalisiert'. Diese Normalisierung bewirkt, daß das erste Byte 
eines Tastenzuordnungsregisters von 240 in 16 geändert wird. Die 
Normalisierung verändert das Quellregister. 
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Würde man die Programmausführung von "A?" an diesem Punkt beenden, 
so wären alle Tastenzuordnungen unbrauchbar geworden, außerdem würde 
die Rechnertastatur nach einem PACK-Befehl blockieren, und der Rechner 
ließe sich nicht mehr einschalten. Ein solches Blockieren, genannt Crash, 
beschädigt den Rechner nicht. In der Regel ist es jedoch problematisch, 
den Rechner weiterzubenutzen, ohne vorher alle Inhalte mit MEMORY 
LOST zu löschen. Neuere Rechnermodelle lassen sich leicht durch gleich- 
zeitiges Betätigen der CLX-Taste oder der ENTER-Taste zusammen mit der 
ON-Taste wieder einschalten; bei älteren Modellen ist eventuell die 
Entfernung der Batterie für einige Zeit erforderlich. 


In den Programmzeilen 23 bis 28 wird die durch die Normalisierung 
hervorgerufene Veränderung wieder rückgängig gemacht. Problematisch 
dabei ist, daß sämtliche denkbare Konstellationen von Null-Bytes 
innerhalb des Tastenzuordnungsregisters beachtet werden müssen, 
ARCL c dient in Zeile 27 lediglich als besonders schnelle und bytespa- 
rende Möglichkeit, sechs Zeichen an das Alpharegister anzuhängen. 


Zeile 29 bringt den restaurierten Inhalt des untersuchten Tasten- 
zuordnungsregisters an seine ursprüngliche Adresse zurück. Aufgrund 
des ISG Y-Befehls in Zeile 32 wird die beschriebene Routine ab Zeile 14 
für weitere Tastenzuordnungsregister durchgeführt. Die Befehle CLX und 
RDN dienen dazu, die Steuerzahl jeweils im Y-Register, und den ur- 
sprünglichen Inhalt von Register c im X-Register zu erhalten. 


Wird nach ISG Y die folgende Zeile übersprungen, so ist das unmittelbar 
unterhalb des .END. gelegene Register bereits als Tastenzuordnungs- 
register untersucht worden; für diesen Einzelfall ist durch ENTER in 
Zeile 34 der ursprüngliche Inhalt von Register c ins Y-Register zu 
bringen. 


Abgesehen von diesem Sonderfall wird Zeile 35 ({LBL 01) durch den 
Sprungbefehl aus Zeile 22 erreicht. Dies ist dann der Fall, wenn das 
zuletzt aufgerufene Register kein Tastenzuordnungsregister ist. Es kann 
sich dabei um ein freies Register oder um das erste Alarmregister 
handeln. 


Das erste Byte des untersten Alarmregistes hat den Wert 170, der durch 
Normalisierung zu 26 geändert wird. Hier bleibt die Normalisierung ohne 
Folgen und braucht daher nicht rückgängig gemacht zu werden, 


Das zweite Byte des untersten Alarmregisters gibt die Anzahl der für 
Alarme benutzten Register an. Nach Restaurierung des Registers c 
liefert ATOX in Zeile 38 also die Anzahl der Alarmregister. In den folgen- 
den Zeilen (39 bis 43) wird aus der Steuerzahi die Anzahl der benutzten 
Tastenzuordnungsregister ermittelt und schließlich die Anzahl der Alarm- 
register hinzuaddiert, 
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Ze folgende Programmversion von "A?" benötigt keine Funktionen aus 
>em PPC Modul; diese Programmversion kann jedoch nicht mit SST in Ein- 
zeischritten ausgeführt werden. 


29+LBL 68 
38 RCL IND 
y 


31 STOL 
32 CLs 
33 16 
34 ATOX 
35 - 
356 X=HO? 
37 GTO 81 
38 "+ 
39 CLA 
Bi*LEL "RA?" 48 RCL L[ 
2 "x" 41 STO 
83 RCL c< 42 ARCL c 
84 S<> L 43 Min 
85 x<r n\ 44 STO IND 
86 ASHF < 
87 POSA 45 FDN 
88 AROT 46 CLA 
09 x>a? 47 ISG 
18 CLX 48 GTO 86 
11 xX=0? 49 ENTERT 
12 ATOXx 
13 ATOS S5B8*+LBL &1 
14 16 Sl RCHV 
15 MOD 52 STO « 
16& LAST= 53 ATOs 
17 xt2 54 Rt 
15 * 
19 + 55+LBL a2 
28 193 568 X<0? 
el - 57 CLST 
22 x<B8? 53 INT 
23 GTO 82 59 + 
24 3 689 EHD 
25 #7 
26 "xripee" LEL”’RA? 
27 RCL <c END 
28 ASTO c 184 BYTES 


In den Zeilen 02 bis 19 wird durch die gleiche Routine, die bereits in 
einem der Load-Bytes-Programme verwendet wurde, die absolute Adresse 
des Registers ermittelt, in dem das .END. gespeichert ist. 


Zeile 26 enthält folgende synthetische Textzeile: 


246, 42, 1, 105, 12, 0, 0. 
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Durch Verwendung dieser Textzeile in Verbindung mit ASTO c wird der 
Curtain bei dieser Programmversion auf die absolute Adresse 192 versetzt. 
Zeile 38 enthält wieder die Bytes 242, 127, 240. Da der Curtain nicht auf 
Register 16 versetzt wird, ergibt sich für diese Programmversion eine 
andere Steuerzahl. Im übrigen ist die Programmfunktion jedoch unver- 
ändert; auch hier werden keine Datenregister benutzt. 


Aus der Information, wie viele Register für Tastenzuordnungen und 
Alarme belegt sind, läßt sich in vielfacher Weise Nutzen ziehen. Zunächst 
einmal kann man feststellen, ob in den Tastenzuordnungsregistern unge- 
nutzte Lücken enthalten sind: Es sollten nicht mehr als halbsoviele 
Tastenzuordnungsregister belegt sein, wie Funktionen aus CAT 2 oder 
CAT 3 zugeordnet worden sind, da in jedem Tastenzuordnungsregister 
zwei Zuordnungen gespeichert werden können. Stellt man fest, daß einige 
ungenutzte Lücken in den Zuordnungsregistern vorhanden sind, kann man 
zusätzliche freie Register schaffen, indem man alle Tastenzuordnungen 
löscht, den Rechner kurz aus- und wieder einschaltet und anschließend 
die Tastenzuordnungen neu eingibt. Ungenutzte Lücken in den Tasten- 
zuordnungsregistern können vermieden werden, indem man Zuordnungen 
nicht mit der Funktion ASN, sondern mit der Funktion PASN vornimmt. 
Dadurch läßt sich erreichen, daß die durch Löschen von Zuordnungen 
entstandenen Lücken zunächst wieder benutzt werden, bevor weitere 
Register für Tastenzuordnungen belegt werden. PACK oder Aus- und 
Anschalten des Rechners wandeln nur solche Zuordnungsregister in freie 
Register um, in derien keine Zuordnung gespeichert ist; Zuordnungs- 
register mit nur einer Zuordnung bleiben nach wie vor zur Hälfte un- 
genutzt. 


Die durch Tastenzuordnungen belegten Register lassen sich eventuell 
vorübergehend anderweitig nutzen, indem man die Zuordnungen auf 
Statuskarten mit dem Magnetkartenleser aufzeichnet. Das Programm "A?" 
liefert hierzu die Angabe, wie viele Register maximal freigesetzt werden 
können. Unnötige Lücken in den Tastenzuordnungsregistern bleiben 
jedoch auch nach dem Aufzeichnen und Wiedereinlesen von Statuskarten 
unverändert erhalten. 


Alarmdaten können normalerweise nur dadurch recht aufwendig in einem 
externen Speicher abgelegt werden, daß der gesamte Rechnerinhalt 
gespeichert wird. Dies geschieht entweder durch Speicherauszugskarten 
mit dem Kartenleser (WALL) oder durch Speichern des gesamten Rechner- 
inhaltes auf einer Digitalcassette (WRTA). 


Die folgenden Programme erlauben mit Hilfe der synthetischen Pro- 
grammierung, Alarmdaten entweder als Datenfile im erweiterten Speicher 
des X-Functions Moduls oder auf Magnetkarten zu speichern. Damit erhält 
man durch Löschen der Alarme zusätzliche freie Register, ohne daß man 
die Alarme später wieder aufwendig einzeln eingeben muß; darüber hinaus 
kann man wichtige Alarmdaten auf Magnetkarten unproblematisch 
speichern. Ein Verlust ist auch bei MEMORY LOST ausgeschlossen. 
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ı.5 "AF" - Alarme - Datenfile 
42+LEL G2 
43 FLSIZE 
B1l*+LBL "RAF" 28 RDN 44 SIZE” 
B2 176 2ı cLA 45 + 
83 XROM "OM 22 ISG Y 46 PSIZE 
" 7 de "M<F L 
24 GTO 86 43 PSIZE 
84*+LBL 88 49 RDM 
85 RCL IND 25+LBL Bi 
y 26 X<}> 58+LBL 63 
Be& STO L 27 STO c 51 X<>Y 
87 CL 28 ATOX 52 XROM "Ck 
88 ATOX 29 Er a 
89 16 3 LAST 53 KX>fAar 
1a - 31 + 54 SAVERX 
11 X=07 32 KRÄ>Y 55 %=B7 
12 GTO 81 33 "Ar S& GETR 
13 “h" 34 X#B? 57’ Rt 
14 CLX 35 ISG & 58 STO < 
15 RCL E£ 36 GTO 82 59 CLST 
18 STO 37 CRFLD 68 END 
1? ARCL c 38 DSE X 
18 R<i> = 39 E3 LEL'"AF 
19 STO IND 48 + EHD 
z 41 GTO 83 123 BYTES 


Das Programm "AF" erfüllt gleichzeitig zwei Aufgaben: Es speichert die 
Alarmregister in ein Datenfile im erweiterten Speicher des X-Functions 
Moduls und überträgt diese Daten auch wieder als Alarme in den Rechner 
zurück. Dabei entscheidet das Programm selbständig, ob in ein Datenfile 
gespeichert oder von dort gelesen wird. 


Sind im Rechner Alarme gespeichert, werden diese in ein Datenfile 
gespeichert (und bleiben unverändert im Rechner erhalten); sind keine 
Alarme vorhanden, so werden Alarmdaten vom Datenfile in den Rechner 
gelesen. 


Das Programm "AF" darf nicht als erstes im CAT 1 stehen, es muß 
mindestens ein END vorausgehen. Die Programmausführung sollte nicht 
unterbrochen werden; das Programm muß bis zum Ende oder bis zu einem 
Fehlerstopp ablaufen, damit der Inhalt von Register c restauriert wird. 
Das X-Functions Modul und das PPC Modul werden benötigt. 


Die Eingaben mit "LB" für Zeile 13 lauten: 241, 240. 
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Bevor das Programm "AF" gestartet werden kann, muß festgestellt wer- 
den, wie viele freie Register vorhanden sind. Das Programm darf nur 
dann benutzt werden, wenn mindestens ein freies Register angezeigt 
wird. Dazu ist RTN (oder GTO.000 oder GTO ..) auszuführen und kurz 
in den PRGM-Modus zu schalten, 


Folgende Fehlermeldungen können auftreten: 


DUP FL (Zeile 37) Datenfile "AF" und Alarme sind vorhanden 

NO ROOM (Zeile 37) Im erweiterten Speicher gibt es nicht genug 
unbenutzte Register zur Aufnahme des 
Datenfiles 

FL NOT FOUND (Zeile 43) Weder Datenfile "AF" noch Alarme vorhanden 

NO ROOM (Zeile 46) Nicht genug freie Register zur Aufnahme der 


Alarme vorhanden 


Hält das Programm wegen einer Fehlermeldung, muß es nach Beseitigung 
der Fehlerursache von Anfang an neu gestartet werden. Das Programm 
prüft nicht, ob der Datenfile "AF" tatsächlich als Alarmdaten verwendbare 
Informationen enthält. Es arbeitet nur dann wie gewünscht, wenn zu 
Beginn der Programmausführung Alarmdaten entweder im I/O-Buffer oder 
im Datenfile "AF" gespeichert sind; nach vollständiger Programmaus- 
führung sind die Alarmdaten immer zweimal im Rechner gespeichert: Im 
I/O-Buffer und im Datenfile "AF". Sie können dann also einmal gelöscht 
werden. 


Das Programm "AF" benutzt zunächst bis einschließlich Zeile 32 im 
wesentlichen die gleiche Routine wie "A?", um die Anzahl der Tasten- 
zuordnungsregister und Alarmregister zu ermitteln. In Zeile 33 enthält 
das X-Register die Anzahl der Alarmregister, das Y-Register enthält die 
absolute Adresse des ersten Alarmregisters. Hier wird nun entschieden, 
ob Alarmdaten in ein Datenfile gespeichert oder von dort gelesen werden 
sollen. Sind im Rechner Alarmdaten gespeichert, wird in Zeile 37 mit 
CRFLD ein Datenfile mit der Bezeichnung "AF" angelegt. Um Probleme mit 
der Normalisierung zu vermeiden, wird die Größe des Datenfiles mit einem 
Register mehr definiert, als Alarmregister vorhanden sind. Dieses zu- 
sätzliche Register darf aber nicht das .END. enthalten, weshalb das 
Programm "AF" auch nur dann ausgeführt werden darf, wenn mindestens 
ein freies Register vorhanden ist. 


In den Programmzeilen 38 bis 40 wird die Steuerzahl für SAVERX erzeugt. 
Um diese Steuerzahl benutzen zu können, wird der Curtain durch die 
Routine "CX" aus dem PPC Modul auf die absolute Adresse des ersten 
Alarmregisters versetzt. Schließlich erhält Register c wieder seinen 
ursprünglichen Inhalt, wodurch auch der Curtain wieder zurückgesetzt 
wird. 
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Waren im Rechner keine Alarme gespeichert (Zeile 34: X = 0), verzweigt 
Zeile 36 zu LBL 02 in Zeile 42. Da das Programm in diesem Fall die Auf- 
gabe hat, die Alarmdaten aus dem Datenfile in den Rechner zu übertra- 
gen, wird nun in Zeile 43 bis 48 geprüft, ob dazu genügend freie 
Register vorhanden sind. Dies geschieht, indem die Anzahl der Daten- 
register um die Anzahl der Fileregister erhöht wird (ergibt sich keine 
Fehlermeldung, dann ist genügend Platz vorhanden). Anschließend wird 
wieder die ursprüngliche Anzahl der Datenregister definiert. Der Befehl 
"CX" (Zeile 52) versetzt auch in diesem Fall den Curtain auf die absolute 
Adresse des ersten Alarmregisters (hier die absolute Adresse des ersten 
Registers oberhalb der Tastenzuordnungen). Da die Steuerzahl jetzt 0 ist, 
wird durch GETR (Zeile 73) der Inhalt aller Register des Datenfiles in die 
korrespondierenden Datenregister übertragen. Da zuvor der Curtain auf 
das erste Alarmregister versetzt wurde, wird dieses vom Rechner als 
Datenregister 00 interpretiert; auf diese Weise können alle Alarmregister 
durch GETR übertragen werden. Zum Programmende wird Register c 
restauriert. 


Die zweite Programmversion von "AF" benutzt keine Funktionen des PPC 
Moduls: 


58+LBL 63 


S5S1 Ri>V 
52 19= 
G1+LBL "HF" 53 + 
a2 CLST 54 ENTERT 
03 "xr-iute" 55 "xji" 
84 RÜL c = 16 
[— - f 
ee Z’+LEL Bi 53 -TonA 
D96+LEL AU 23 Mi£irY 59 ga L 
a7 RCL IND zZ sto < 68 MOD 
v 38 ATÜN® 81 LAST: 
05 STO L[ 3 Rt 62 *+ 
83 CL“ 32 ASENV 83 STOR 
18 ATOS 33 "Ar" 64 KIT 
11 16 34 A#Ra? 865 ATOR 
12 - 35 ISG =& 856 RCL co 
13 ##07 36 GTO az 67 RDN 
14 GTÜ vi 37 CRFLOD 65 ASTO < 
ri 3 DS Fa &9 CLA 
18 EL E.5=] 3 Ba xX>0%7 
17 RCL L 40 71 SAYER® 
iS STO 41 GTO 82 r’2 8=87 
193 ARUL «= 73 GETR 
zu aMi> 42+LEL 5 Y’4 Rt 
21 STG IHD 43 FLSIEE 75 STO c 
Z 44 SIZE” 7& CLST 
22 RDH 45 + 7 EHD 
23 CLA 46 FSIZE 
=z4 ISG W 47 SÄF L LEL"AF 
PT 45 PSIZE EHD 
2& GTD 88 43 RDH 135 BYTES 
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Es sind folgende synthetischen Textzeilen vorhanden: 


Zeile 03: 246, 42, 1, 105, 12, 0, 0 
Zeile 15: 241, 240 
Zeile 55: 242, 1, 105. 


In den Zeilen 54 bis 68 ist eine Routine enthalten, die den Curtain auf 
die im X-Register angegebene Adresse versetzt. Sie entspricht damit 
grundsätzlich dem Programm "CX" aus dem PPC Modul. Um die Routine 
möglichst kurz zu halten, wird jedoch die Adresse des .END. nicht 
codiert. Daher können Programme, in denen diese Routine verwandt wird, 
nicht mit SST in einzelnen Schritten ausgeführt werden. 


In beiden Programmversionen von "AF" ist nach dem Befehl I1SG Y 
(Zeile 22 bzw. Zeile 24) ein synthetischer Befehl mit dem Bytewert 240 
enthalten. Dieser Programmbefehl kann ideal als NOP eingesetzt werden, 
d.h. seine Ausführung hat keine Wirkung. Außerdem ist die Ausführung 
dieses Befehls besonders schnell. 


In Zeile 22 bzw. Zeile 24 wird durch den NOP erreicht, daß nach 
Erhöhung des Schleifenzählers im Y-Register immer nach LBL 00 verzweigt 
wird. Da "AF" nur ausgeführt werden darf, wenn mindestens ein freies 
Register vorhanden ist, erübrigt sich in diesem Programm die Begrenzung 
des Schleifenzählers durch die Adresse des „END. wie in "A?", 


Sofern keine Tastenzuordnungen aus CAT 2 oder CAT 3 gespeichert sind, 
hat das erste Alarmregister die absolute Adresse 192. In diesem Fall ist 
es besonders einfach, die Alarmdaten zu übertragen, 


Die letzte Programmversion von "AF" zeigt besonders deutlich, daß durch 
die synthetische Programmierung auch in sehr kurzen Programmen 
Erstaunliches erreicht werden kann. Bevor mit diesem Programm Alarme 
aus dem Datenfile in den Rechner übertragen werden, ist unbedingt zu 
prüfen, ob genügend freie Register vorhanden sind. Wird diese Prüfung 
vergessen, könnte das letzte im Programmspeicher vorhandene Programm 
einschließlich des .END. durch die Alarmdaten überschrieben werden. 
Dann ist kein Zugriff mehr auf die Programme möglich (CAT 1). Der 
Rechnerinhalt läßt sich jedoch größtenteils dadurch retten, daß man alle 
Alarme wieder löscht (im ALMCAT oder CAT 5) und anschließend durch 
CTO .. den Programmspeicher wieder zugänglich macht. Zumindest der 
Schluß des letzten Programms ist jedoch verloren. 
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Bi+LBL "AF“ 


zrese Kurzversion von "AF" löscht zunächst 82 CLKEYS 
sämtliche Tastenzuordnungen und setzt dann BZ "sipse" 
sn Curtain auf die absolute Adresse 192. 84 xX<> [ 
Zazu wird in Zeile 03 folgende Textzeile 85 x<> c 
‚erwandt: 245, 1, 105, 12, 0, 0. Da auch 86 RCL 88 
-ier die Adresse des .END. nicht codiert 07 a? A 
»sird, kann das Programm nicht mit SST = Er A 
zusgeführt werden. Bis zur Zeile 11 wird 18 ATOXx 
zus dem zweiten Byte des im absoluten 11 ATOX 
Register 192 gespeicherten Wertes die Anzahl 12 "AF" 
ser Alarmregister ermittelt. Der weitere 13 xXx#8? 
Programmablauf ist bis auf die entnommene 14 ISG = 
Prüfroutine (LBL 02) prinzipiell wie in den n Be 
beiden vorigen Programmversionen. > DSE % 

18 E3 
Bei der Programmierung von "AF" wurde 19 + 
Wert darauf gelegt, daß das Register c immer 
den ursprünglichen Inhalt hat, wenn das ZB+LBL G8 
Programm wegen einer Fehlermeldung anhal- 21 SEEKFTR 

ei s s ® 22 RCL = 

ten könnte. Dies gilt für alle Programm- 23 N£N c 
versionen von "AF", 24 NCHY 

25 x>60?7 
Das anhand des Programms "AF" erläuterte 26 SAVER# 
Prinzip zur Übertragung von Alarmdaten 27 x=5? 
kann auch angewandt werden, um die Daten 28 GETR 
der Alarmregister auf Magnetkarten zu = ER 
speichern. Dadurch hat man die Möglichkeit, 31 CLST 
diese Daten auch im Falle von MEMORY LOST 32 END 
zu erhalten. 

LEL’'AF 

END 

64 BYTES 


8.6 "AC" - Alarme - Magnetkarte 


Das Programm "AC" überträgt die Daten aus den Alarmregistern 
auf Magnetkarten und liest entsprechende Datenkarten wieder als Alarm- 
daten in den Rechner ein. Ähnlich wie in "AF" entscheidet auch das 
Programm "AC" selbständig, ob Magnetkarten beschrieben oder gelesen 
werden. Das X-Functions Modul und das PPC Modul sind erforderlich. 


Auch dieses Programm darf nicht als erstes im CAT 1 stehen, es muß 
mindestens ein END vorausgehen. Das Programm muß bis zum Ende ab- 
laufen, damit Register c restauriert wird. Erscheint in der Anzeige die 
Aufforderung zum Einlesen von Magnetkarten, so ist diese entweder zu 
beachten oder das Programm muß durch zweimal R/S gestartet werden. Es 
werden keine Datenregister benutzt. Das Programm enthält eine synthe- 
tische Textzeile: 


Zeile 21: 242, 127, 240. 
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ai+LBL "AC” 


a2 176 
83 XROM "E? 
84 17 
5 pen 
a5 X<Y? 
97 GTO e= 
es E3 
89 7 33+LBL 91 gsB+LBL BZ 
19 + 34 <>Y 6i + 
11 XROM "OM 35 STO c 62 PSIZE 
= 36 ATOX 63 Kir L 
37 Rt 84 PSIZE 
12+LBL 48 38 LASTX 865 CL* 
13 RCL IND 39 + 
y 468 INT 66+LBL 83 
14 STO C 41 X<>Y 67 X=B? 
15 CLX 42 X=20? 68 DSE X 
16 ATOX 43 GTO 43 69 EZ 
17 16 44 CLX ‚oe. 
15 - 45 5 71 Kerr 
19 Xz07 456 XROM "CH 72 XROM "CK 
28 GTO 81 “ 2 
2 “pe 47 CLX 73 TONE 3 
22 CLM 43 TONE 3 ”4 x>0? 
23 RCL CL 49 RDTAX 75 WDTAX 
z4 STO sa Rt 76 X=9? 
25 ARCL c 51 STO c 77? RDTA 
26 X£> N 52 CLX 78 Rt 
27 STO IND 53 ATOX 79 5TO c 
zZ 54 26 s8 CLST 
28 RDN 55 xX#Y? 81 END 
29 CLA S6& ASIN 
38 ISG “ > Rt LBL’AC 
31 GTO 68 58 ATOX END 
32 ENTERt 59 SIZE? 138 BYTES 


Um Alarmdaten auf Magnetkarten zu speichern, ist das Programm "AC! zu 
starten. Um Alarmdaten von Magnetkarten in den Rechner zurückzuladen, 
sind zunächst alle Alarme zu löschen und dann ist das Programm "AC!" zu 
starten. Nach einem Ton erscheint in der Anzeige die Aufforderung 
'RDY 01 OF NN' oder 'CARD' zum Einlesen von Magnetkarten. Um Alarm- 
daten in den Rechner zurückzuladen, muß die erste Spur der entspre- 
chenden Datenkarte zweimal eingelesen werden; die entsprechende 
Aufforderung erscheint daher zweimal. Nach dem Einlesen von Alarmen 
sollte man den Rechner ausschalten, um eventuell überfällige Alarme 
erkennen zu können. 
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Das Programm "AC" kann folgende Fehlermeldungen hervorrufen: 


so ROOM (Zeile 62) Es sind nicht genug freie Register 
vorhanden, um die Alarmdaten auf- 
zunehmen. 

DATA ERROR (Zeile 56) Die eingelesene Karte enthält keine 
Alarmdaten - das Programm ist neu zu 
starten. 

NONEXISTENT (Zeile 49, 


Zeile 75) Das Programm wurde ohne Kartenleser 
gestartet - SF 25, R/S! 


Der Aufbau und die Funktion bei der Übertragung der Alarmdaten auf 
Magnetkarten entspricht dem Prinzip des Programms "AF". Zum Prüfen 
der eingelesenen Datenkarte wurde eine besondere Routine eingefügt 
(Zeile 44 bis 58). 


In Zeile 46 wird zunächst der Curtain auf das Register mit der absoluten 
Adresse 5 versetzt; dies ist der erste Teil des Alpharegisters, 
Register M. Durch RDTAX wird nun das erste Datenregister von der 
Datenkarte in Register M eingelesen (da X = 0). Handelte es sich dabei 
um ein erstes Alarmregister, müßte das erste Byte den Wert 26 (nach 
Normalisierung) haben. Ist dies nicht der Fall, wird in Zeile 56 eine 
Fehlermeldung ausgelöst. 


Das nächste Byte des eingelesenen Registers gibt die Anzahl der erfor- 
derlichen Register für die gespeicherten Alarmdaten an; mit diesem Wert 
wird geprüft, ob genügend freie Register zur Aufnahme der Alarme vor- 
handen sind (Zeile 59 bis 64). 
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Das gleiche 


Programm kann 


PPC Moduls realisiert werden: 


B1l*+LBEL "ACC" 


ok 
RCL c« 
<> L 
> % 
ASHF 
POSA 
AROT 


E3 


"xrjue4" 
RCEL c 
ASTO <= 


29+LBL #6 


Gl 


a3) 


RCL IND 

y 
STO L 
cL=* 


Kid on 
STO INT 


Z 


ROoN 
ELA 
15G V 
GTO 58 
EHTERT 


m 


Diese 


natürlich 


Programmversion 


auch ohne Verwendung des 


enthält folgende 


synthetische Textzeilen: 


Zeile 26: 246, 42, 1, 105, 12, 0,0 
Zeile 38: 242, 127, 240 
Zeile 59: 245, 1, 105, 0, 80, 0 
Zeile 88: 242, 1, 105 
79+LBL 63 
80 xX=07 
sı DSE % 
2 63 
83 
84 Ki>Y 
= 5 192 
S@+LBL 61 =. 
a1 B&eT 87 ENTERT 
52 STO « ee 
53 ATOx er 
54 Rt Es 
a u! 91 XTOR 
56 RCL % ER 
re 93 MUüD 
sB GT0 B3 934 LASTX 
59 "ziePpe" ee 
68 ASTO c veen 
61 TONE 83 le 
62 RDTAX SE an 
53 ET 33 RCL co 
+ = ® 180 RIN 
65 CL% 

2 ars 181 ASTO « 
IH 182 TONE & 
en 193 X>87? 

68 Kerr? 
Feen 144 WDTRA: 
SB Ri 195 X=8? 
=4 ATD% 196 RDTA 
198 STO « 
Rx 199 CLST 
73+LEL az 
De 116 END 
5 PSIZE a 
FE Kir L LEL’AL 
77 PSIZE N! 
72 CLX* 159 EYTE=S 
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Programmbedienung und Fehlermeldungen sind wie bei der ersten Version 
von "AC", Auch dieses Programm muß durch zweimal R/S gestartet 
werden, wenn die Aufforderung zum Einlesen von Magnetkarten nicht 
beachtet werden soll. Da die Magnetkarten bei versetztem Curtain ein- 
gelesen werden müssen, ist es unbedingt erforderlich, daß das Programm 
anschließend weiterläuft, damit Register c restauriert wird. 


Eine Kurzversion von "AC" mit nur 20 Programmzeilen (entsprechend der 
Kurzversion von "AF" auf Seite 53) ist auf dem Titelbild dieses Buches 
abgedruckt. Das PPC Modul wird für die Kurzversion nicht benötigt; die 
synthetische Textzeile (Zeile 03) entspricht der des Programms "AF" von 
Seite 53. 


8.7 "A-" - Alarme unterdrücken 
Im Zusammenhang mit den Alarmfunktionen Bl*+LEL "A-" 
des Time Moduls ergibt sich bei der synthe- 82 SIGN 
tischen Programmierung das Problem, daß ein 83 x<> c 

f n f R FIR 84 ARLMNOW 
Alarm zu einer ungünstigen Zeit fällig 

; ; 85 87 cc 

werden kann. Dies kann insbesondere dann O6 XD L 
zur Löschung des gesamten Rechnerinhalts 87 END 
führen, wenn der Curtain versetzt ist 
und/oder das Register c vorübergehend LBL’A- 
einen solchen Inhalt hat, daß die Programm- END 
ausführung nicht unterbrochen werden darf. 18 BYTES 


Dieses Problem läßt sich mit dem Programm "A-" beseitigen. Nach Aus- 
führung dieses Programms werden keinerlei Alarme mehr aktiviert; dies 
gilt auch für eventuell vorher schon überfällige Alarme. Man ist also bei 
der Programmierung oder Ausführung synthetischer Programme vor über- 
raschenden Unterbrechungen durch Alarme sicher. "A-" verändert nur 
das LastX-Register. "A-" darf keinesfalls mit SST ausgeführt oder unter- 
brochen werden! 


Sobald der Rechner einmal ausgeschaltet wird, werden Alarme wieder 
normal aktiviert. Dabei ist zu beachten, daß auch die Ausführung der 
Funktion CLOCK in Verbindung mit dem Time Modul (nicht im HP41-CX) 
den Rechner kurzzeitig ausschaltet. 
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9 SORTIEREN VON DATENREGISTERN 


Die Programmoptimierung läßt sich besonders anschaulich an Sortier- 
programmen demonstrieren. Zunächst sollte man die Anforderung stellen, 
daß ein Sortierprogramm selbst keine Datenregister als Zwischenspeicher 
benutzt, damit durch Vorgabe einer Steuerzahl jeder denkbare Block von 
Datenregistern sortiert werden kann. Die Steuerzahl sollte in dem für 
einen ISG-Befehl üblichen Format sein. 


Ausgehend von diesen Grundvoraussetzungen kann man nun versuchen, 
ein möglichst kurzes und schnelles Sortierprogramm zu erstellen. 
9.1 "Sp" - Sortierprogramm 


9,2 "SON - Sortierprogramm 


Bi*+LBL "SB" Bi+LEL "50" 
82 SIGN 82 SIGN 
B3+LBlL 864 B3+LEL 05 
84 LASTK 84 LAST# 
85 STD 4 85 RCL IND 
86 RCL IND = 
L 
B665+LEL 51 
B87+LBL Bil 67 RCL IND 
88 RCL IND Er 
a a8 5<T? 
B93 x<>V DB3 83V 
19 x>Y? 18 STO IND 
11 %<> IND Fa 
3 11 RIN 
12 ISG a = ISG W 
13 GTO 61 13 GTO ei 
14 STO IND 14 STO IND 
[8 L 
15 ISG L 15 ISG L 
16 GTO 86 16 GTÜ 68 
17 CLST 17 CLST 
18 TONE 3 18 TONE = 
19 END 19 END 
LBL"'SA LBEL "SO 
END END 


36 BYTES 35 BYTES 
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Die Kürze eines Programmes ist dabei einfach zu beurteilen; ein absoluter 
Maßstab für die Schnelligkeit ist schon schwieriger zu finden. Vergleicht 
man verschiedene Sortierprogramme im Hinblick auf ihre Schnelligkeit, so 
kann sich ergeben, daß ein Programm wenige Datenregister langsamer, 
aber eine große Anzahl von Datenregistern schneller als ein anderes 
sortiert. 


"Sp" und "SO" sind zwei besonders kurze Sortierprogramme, die das 
Prinzip des Bubble-Sort benutzen. Beide Programme sortieren den 
vorgegebenen Block von Datenregistern in aufsteigender Reihenfolge. 
Wenn man den Vergleichsbefehl umkehrt, ergibt sich eine Sortierung in 
absteigender Reihenfolge. "S®" benutzt Register a als Zwischenspeicher. 
In diesem Register werden Rücksprungadressen ab der dritten Rück- 
sprungadresse gespeichert; daher kann dies Programm maximal als zweites 
Unterprogramm aufgerufen werden. Von dieser Einschränkung abgesehen 
kann Register a beliebig als Zwischenspeicher benutzt werden, es wird 
mit Ende des Programms durch RTN oder END immer gelöscht. Durch Ver- 
wendung dieses Zwischenspeichers kann die innere Schleife (Zeile 
07 bis 13) kürzer programmiert werden als bei der zweiten Programm- 
version. Dadurch ergibt sich eine geringfügig schnellere Sortierung. 
Beide Sortierprogramme sind nur für Datenregister anwendbar, in denen 
Zahlen gespeichert sind. 


9.3 "SX" - Sortierprogramm 


Der HP4I-CX bietet mit seinen neuen Ver- SH 
f ; P : ia ; B1+LBEL "SX 
gleichsfunktionen nicht nur die Möglichkeit, 8?*+LBL ac 
kürzere und damit schnellere Sortierpro- 83 RCL x 
gramme zu erstellen, sondern mit diesen 84 RCL IND 


neuen Vergleichsfunktionen können auch ” 


Alpha-Daten sortiert werden. 
85+LBL Gi 


86 X>HNN? 


Das Programm "SX" sortiert mit erstaunlich 87 <> IND 
geringem Aufwand numerische und Alpha- y 
Daten in aufsteigender Reihenfolge. Auch 838 ISG 
hier kann für eine absteigende Sortierfolge 8? GTO 81 
der entgegengesetzte Vergleichsbefehl be- 18 STO IND 
nutzt werden. = 
11 Xi> 
Um eine wesentlich kürzere Sortierzeit zu = . Ei 
erreichen, ist erheblich größerer Pro- 14 CLST 
grammieraufwand erforderlich. Das wohl 15 TONE $ 
schnellste Sortierprogramm in weiten 16 END 
Bereichen, "S2" aus dem PPC Modul, be- 
legt 123 Bytes. Es benutzt sämtliche Teile m 
des Alpharegisters als Zwischenspeicher, 34 BYTES 


zusätzlich wird ein Flag benutzt. 
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9.4 


"SD" - Sortierdauer 


81+LBL "STD" 
B2 2 

83 XiYT? 

84 RDN 

85 SIZE? 
86 X<C>Y 

87 xX>Y? 

88 PSIZE 


19+LBL Ga 
28 RCL N 
21 9821 

22 * 

23 ,.211327 
24 + 

25 FRC 

26 STO “ 
2? ES 

28 * 

29 INT 

38 STO IND 


31 ISG ] 
32 GTO 08 


LBEL'SD 
END 
32 BYTES 


Das Programm "SD" dient dazu, die Laufzeit 
verschiedener Sortierprogramme möglichst 
objektiv zu beurteilen. Da das Sortier- 
programm in Zeile 39 aufgerufen wird, ist 
diese jeweils entsprechend des Programm- 
namens zu ändern. Nach Eingabe der Anzahl 
der zu sortierenden Datenregister ist "SD" 
zu starten. 


Das Programm prüft zunächst, ob genügend 
Datenregister definiert sind; ggf. wird die 
Anzahl der Datenregister erhöht. Dann wird 
die für das spätere Sortierprogramm erfor- 
derliche Steuerzahl errechnet und angezeigt. 


Während diese Steuerzahl in der Anzeige 
verbleibt, wird durch einen Standardzufalls- 
generator (Zeilen 19 bis 26) für jedes der zu 
sortierenden Datenregister eine Zufallszahl 
erzeugt. Wegen der festen Vorgabe im Pro- 
gramm ergeben sich für die gleiche Anzahl 
von Datenregistern immer identische Zufalls- 
zahlen; dadurch sind die Sortiervoraus- 
setzungen für jedes Programm bei gleicher 
Anzahl von Datenregistern immer identisch. 
Sobald die Steuerzahl aus der Anzeige 
gelöscht wird, ruft Zeile 39 das zu testende 
Sortierprogramm auf. Die Sortierdauer wird 
durch die Stoppuhrfunktion des Time Moduls 
gemessen. 


Bei der Anwendung dieses Programms zur 
Beurteilung der Sortierdauer solite kein 
Drucker (kein HP-IL Modul) angeschlossen 
werden, da dies eventuell eine erhöhte 
Laufzeit ergibt. Außerdem sollte man "SD" im 
CAT 1 unmittelbar hinter das zu testende 
Sortierprogramm positionieren, damit die 
Ausführungsdauer des Sprungbefehls 
(Zeile 39) das Ergebnis möglichst nicht 
beeinflußt. 
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"0 DAS HP-IL DEVELOPMENT MODUL 


Das HP-IL Development Modul (nicht zu verwechseln mit dem HP-IL 
Wodul!) bietet neben der ausführlichen Analyse und Manipulations- 
röglichkeit des IL-Systems phantastische Möglichkeiten für die 
synthetische Programmierung. So enthält das HP-IL Development Modul 
wesentlich erweiterte Alphafunktionen sowie Ein- und Ausgabefunktionen 
n den Zahlensystemen HEX, OCT, BIN. Damit sind Umrechnungspro- 
zramme (fast) nicht mehr erforderlich. Wer zum Beispiel im Hexa- 
dezimalsystem (bis zur Größe von FFFF FFFF) rechnen muß, hat mit dem 
HP-IL Development Modul eine ideale Hilfe. Auch die Boolschen Funktionen 
AND, NOT, OR, XOR sowie Bitrotation und Bitabfrage sind vorhanden. 


Die interessantesten Möglichkeiten für die synthetische Programmierung 
bietet das HP-IL Development Modul mit dem Buffer. Hierbei handelt es 
sich um einen Zwischenspeicherbereich, der registerweise und auch 
byteweise benutzt werden kann. Entscheidend dabei ist, daß die Daten 
beim Kopieren in den Buffer nicht normalisiert werden. 


Jeder beliebige Registerinhalt des Rechners kann in den Buffer kopiert 
werden, ohne daß dadurch das Quellregister verändert wird. Es gibt also 
keine Normalisierungsprobleme mehr! Der Inhalt des Buffers kann byte- 
weise ausgedruckt oder angezeigt werden. Er ist vergleichbar einem File 
im erweiterten Speicherbereich; es gibt auch hier einen Zeiger (Pointer), 
der das einzelne Byte bezeichnet. Im Gegensatz zum erweiterten Speicher- 
bereich des X-Functions Moduls liegt aber der Speicherbereich des 
Buffers im Rechner selbst, im Bereich zwischen den Tastenzuordnungen 
oder Alarmen und den Programmen. 


Der Buffer kann durch BSIZEX in der gewünschten Größe (in Bytes) 
angelegt werden. Die tatsächliche Größe ist jedoch immer durch 7 teilbar, 
da jedes Register 7 Bytes enthält. Für interne Kennzeichnungen werden, 
ähnlich wie im erweiterten Speicherbereich, zusätzlich 2 Register 
gebraucht. Der Buffer wird zwangsweise gelöscht, wenn der Rechner 
ohne eingesetztes IL Development Modul eingeschaltet wird. 


Wie man von jedem beliebigen Register aus (Daten- Stack- und Alphare- 
gister) mit Mitteln der synthetischen Programmierung auch Programm- 
Tastenzuordnungs- Alarm- und Statusregister (!) in den Buffer speichern 
kann, so ist auch der umgekehrte Vorgang möglich. Man kann also via 
Buffer synthetische Programmbefehle oder synthetische Tastenzuord- 
nungen erzeugen. Hierfür erweist sich auch die direkte Eingabemög- 
lichkeit im Hexadezimalsystem als sehr nützlich. 
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Bi+LEL "FB 


82 
03 


36 


CLST 
"RABES.FG 
? 


PROMFT 
"BYTES 


PROMPT 
BSIZEX 


“n 
_ 
=) 
NX 


STOrF 
ENTERTt 


ni" 


MOD 
LASTA 
* 
%-AR 
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Den bedeutendsten Fortschritt kann man 
darin sehen, daß es mit Funktionen des 
HP-IL Development Moduls erstmals möglich 
ist, synthetische Befehle durch ein Programm 
zu erzeugen, das selbst keinen einzigen 
synthetischen Befehl enthält. Es ermöglicht 
also einen problemlosen Einstieg in die 
synthetische Programmierung. 


10.1 "PB" - Print Bytes 


Das Programm "PB" dient dazu, Bytes eines 
jeden beliebigen Registers anzuzeigen/auszu- 
drucken. Das Programm darf nicht als erstes 
im CAT 1 stehen; es muß mindestens ein 
END vorausgehen. Zeile 38 darf nicht mit 
SST ausgeführt werden. 


Man gibt auf die erste Aufforderung 
"ABS.RG ?" die absolute Adresse des 
gewünschten Registers ein. Dies wäre zum 
Beispiel für den HP41-CV/CX oder HP41-C 
mit 4 MM oder QM bei SIZE 100 für den 
Anfang des ersten Programmes aus dem 
CAT 1 die Adresse 411 (511 - 100); oder für 
das erste Tastenzuordnungsregister die 
Adresse 192. Die Adresse des ersten Files im 
erweiterten Speicherbereich ist z.B. 190. 
Man kann jede Adresse innerhalb des Pro- 
grammspeichers oder im erweiterten 
Speicherbereich durch einen RCL b-Befehl 
und anschließende Decodierung (Programm 
"PD", Seite 35, dividiert durch 7) ermitteln. 
Auf die zweite Aufforderung "BYTES ?" gibt 
man die gewünschte Zahl ein, für Status- 
register, Tastenzuordnungsregister, Alarm- 
oder Bufferregister sollte die Zahl 7 einge- 
geben werden, um jedes Register einzeln zu 
behandeln. 


Werden mehrere Register in den Buffer ge- 
lesen, so sind die absoluten Adressen ab- 
steigend, wie es der Speicherung von Pro- 
grammen entspricht. Wird für das obenge- 
nannte Programmbeispiel 21 Bytes einge- 
geben, so werden die absoluten Register 
409, 410, 411 kopiert. 
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>a Tastenzuordnungen in den Registern ab 192 aufsteigend gespeichert 
„erden, muß man, um mehrere Tastenzuordnungsregister zu kopieren, auf 
Jie erste Aufforderung "ABS.RG ?" die höchste Registeradresse eingeben. 
Sollen z.B. 4 Zuordnungsregister angezeigt werden, ist einzugeben: 
ABS.RG ? = 195, BYTES ? = 28. 


Der Programmstopp in Zeile 16 ist zur Sicherheit vorgesehen. Hier hat 
man die Möglichkeit, die Eingabe zu kontrollieren, bevor mit R/S gestartet 
wird. Die Zeilen 17 bis 33 des Programms setzen den Curtain auf die 
absolute Adresse, die bei dem Stopp (Zeile 16) angezeigt wurde. Wird 
hier eine nicht existente Adresse angesprochen, erhält man MEMORY 
LOST! Register im erweiterten Speicherbereich können benutzt werden, 
sofern das entsprechende Modul vorhanden ist. 


Aufgrund der Eingabe wird zunächst der Buffer in der gewünschten 
Größe angelegt (Zeile 07). Dann wird aus der tatsächlichen Größe des 
Buffers für die spätere Schleifensteuerung in Zeile 37 die Anzahl der zu 
kopierenden Register bestimmt. Bis zum Programmstopp in Zeile 16 wird 
die niedrigste absolute Adresse der zu kopierenden Register berechnet. 
Die Zeilen 17 bis 33 versetzen den Curtain dann auf diese absolute 
Adresse, so daß das erste zu kopierende Register als relatives Register 
00 erscheint. 


Zeile 18 enthält die synthetische Textzeile: 242, 1, 105. 


Wer ein PPC Modul besitzt, kann die Zeilen 17 bis 33 durch den Befehl 
XROM "CX" ersetzen und dadurch 24 Bytes sparen. Anschließend werden 
die Register einzeln in den Buffer kopiert (Zeile 36); dann wird 
Register c restauriert, und der Inhalt des Buffers wird byteweise 
angezeigt oder ausgedruckt (Zeile 43). BSIZEX (Zeile 44) löscht den 
Buffer wieder, da das X-Register 0 enthält. 


Mit "PB" läßt sich auf einfache Weise der gesamte Rechnerinhalt er- 
forschen. Dabei können auch Bytes aus den Statusregistern angezeigt 
oder ausgedruckt werden; man muß jedoch beachten, daß das Programm 
"PB" selbst einige Statutsregister verändert. Das Alpharegister ist immer 
gelöscht, der ursprüngliche Inhalt von Register c befindet sich im 
Register T (ABS.RG ? = 0), wenn in den Buffer kopiert wird. Durch 
"PB" läßt sich auch nachvollziehen, daß das erste Byte des untersten 
Alarmregisters den Wert 170 hat, der durch Normalisierung mit dem 
Programm "A?" zu 26 wird. Auch die internen Kennzeichnungsregister im 
X-Functions Modul oder X-Memory Modul, ja sogar die internen Kenn- 
zeichnungen des Buffers lassen sich decodieren,. 


So schließt der Buffer nach oben hin immer mit einem Register ab, das 
die folgenden Werte hat: 16, 77, 79, 78, 73, 84, 82. Dies entspricht der 
Textzeille MONITR; hier ist der frühere Name des Moduls (HP-IL 
MONITOR ROM) erkennbar geblieben. 
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10.2 "E?" - „END. Finder 
10.3 "C?" - Curtain Finder 


Das HP-IL Development Modul enthält sehr komfortable und vielseitige 
Alphafunktionen. Damit ist es in bisher nicht gekannter Schnelligkeit 
möglich, die im Statusregister c enthaltenen Adressen des .END. und des 
Curtain zu entschlüsseln. Dies wird an den Programmen "E?" und "C?" 
erkennbar. 


eil+LEL "üC?" 


Bl+LBL "E?"“ 82 RCÜL ı 
02 RCL < 83 28, 7 
083 *<> [ 84 -2 

84 A-=KR 85 A-** 
85 A-XR 86 -3 

B& 16 7” A-KX 
87? MOD 88 1& 

88 LAST 809 ST- EZ 
09 xt2 18 x* 

18 * 11 + 

11 + 2 INT 
12 END 13 EHD 
LEL’E? LBL’C”? 
EHD END 
24 BYTES 23 BYTES 


Die erweiterten Alphafunktionen erlauben, den Zeichencode jeder Stelle im 
Alpharegister zu ermitteln, ohne daß das entsprechende Zeichen aus dem 
Alpharegister gelöscht wird (A-XX). Die Position des Zeichens kann von 
links (positiv) oder auch von rechts (negativ) gezählt werden, Auch der 
umgekehrte Vorgang, jedes beliebige Zeichen im Alpharegister durch ein 
anderes zu ersetzten, ohne daß die übrigen Zeichen verändert werden, 
ist möglich (Y-AX). Dadurch sind alle Probleme der Null-Bytes im Alpha- 
register gelöst, die bei der Decodierung mit ATOX und AROT auftraten, 
Zeichen können an das Alpharegister sowohl rechts als auch links an- 
gehängt werden. Das Alpharegister kann außerdem von rechts oder von 
links gelesen werden. 


Mit diesen neuen Funktionen können einige in den früheren Kapiteln 
dieses Buches enthaltene Programme, die die Funktionen ATOX und XTOA 
aus dem X-Functions Modul benutzen, erheblich verkürzt werden. Das gilt 
für alle Basisumrechnungsprogramme, insbesondere aber auch für das als 
Grundlage der Programme zur Übertragung von Alarmdaten dienende Pro- 
gramm "A?". Es gibt wirklich kaum etwas in der synthetischen Pro- 
grammierung, das nicht durch das HP-IL Development Modul wesentlich 
kürzer und schneller erledigt werden kann (Diese vielseitigen Alpha- 
funktionen sind auch im Extended 1/O Modul enthalten). 


"0.4 "KA" - Key Assignment | 


Die beiden Programme "KA" (Key Assignment | 


und 
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Il) dienen zur 


synthetischen Erzeugung von Tastenzuordnungen. Sie zeigen, wie dieses 
«lassische Problem der Synthetik erstmals mit Programmen gelöst wird, die 


nur normale Programmbefehle enthalten. 


Mit dem Programm "KA" ist es möglich, jeden 
Ein-Byte- oder Zwei-Byte-Befehl synthetisch 
einer beliebigen Taste zuzuordnen. Es 
können sowohl normale Befehle (z.B. 
STO IND 00) als auch synthetische Befehle 
(z.B. STO M) zugeordnet werden. An- 
schließend kann der Befehl dann entweder 
auf Tastendruck sofort ausgeführt werden 
oder bequem in ein Programm eingefügt 
werden. 


Dazu sind die Dezimalwerte der einzelnen 
Bytes und der Tastencode einzugeben, bevor 
das Programm "KA" gestartet wird. Soll z.B. 
der Befehl RCL b der Taste LN zugeordnet 
werden, ist folgende Bedienung erforderlich: 
144, ENTER 124 ENTER 15 XEQ "KA". 


Synthetische Tastenzuordnungen standen am 
Anfang der Entdeckung der synthetischen 
Programmierung durch Mitglieder des PPC. 
Auch heute sind diese Tastenzuordnungen 
noch der wesentliche Schlüssel zur 
synthetischen Programmierung. So können 
die für das Load-Bytes-Programm erforder- 
lichen synthetischen Zwei-Byte-Befehle 
zunächst durch ein Tastenzuordnungs- 
programm erzeugt werden; "LB" eröffnet die 
Möglichkeit, sämtliche synthetischen 
Programmbefehle zu erzeugen. 


Das Programm "KA" ordnet der eingegebenen 
Taste zunächst die Funktion OR aus dem 
IL-Development Modul zu. Damit diese Zuord- 
nung wie vorgesehen durch den Befehl PASN 
vorgenommen werden kann, darf im CAT 1 
kein Globallabel mit diesem Namen vorhanden 
sein. Um eine möglichst schnelle Programm- 
ausführung zu erreichen und Konflikte mit 
anderen Modulen zu vermeiden, die eventuell 
eine gleichnamige Funktion enthalten, sollte 
das IL-Development Modul in Port 1 einge- 
steckt werden, 


B81*+LBL "KR" 
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Diese vorläufige Zuordnung ist aus zwei Gründen erforderlich. Zunächst 
wird in einem Statusregister gekennzeichnet, daß zu der gewünschten 
Taste eine Zuordnung besteht. Außerdem wird in den Zuordnungsre- 
gistern gespeichert, um welche Zuordnung es sich handelt, Anschließend 
wird ein Buffer für 7 Bytes angelegt. Aus der Zahl 703 und der Anzahl 
der definierten Datenregister wird für die spätere Verwendung mit 
RG-BUFX eine Steuerzahl errechnet. 


Bei der Ausführung dieses Befehls prüft das Betriebssystem nicht, ob 
das angegebene Register tatsächlich als Datenregister existiert. Das 
gleiche gilt auch für den umgekehrten Befehl BUF-RGX. Die eigentliche 
Aufgabe dieser Befehle ist es, den Inhalt von Datenregistern in den 
Buffer zu kopieren und umgekehrt. Durch Vorgabe einer Steuerzahl aus 
Anzahl der definierten Datenregister + 512 + absolute Adresse können mit 
Hilfe von RG-BUFX und BUF-RGX nahezu alle Register des Rechners in 
den Buffer kopiert werden und umgekehrt, Diese Besonderheit wird in 
dem Programm "KA" für die Tastenzuordnungsregister ausgenutzt. 


Der Befehl OR des IL-Development Moduls stellt sich in einem Programm 
mit den Dezimalbytes 166, 12 dar. Bei Zuordnung dieses Befehls werden 
diese beiden Bytes neben dem zugehörigen Tastencode auch in den Zuord- 
nungsregistern gespeichert. Da das Programm "KA" die Zuordnungsre- 
gister später nach diesen beiden Werten durchsuchen soll, werden sie 
zunächst über das Alpharegister in das LastX-Register gespeichert 
(Zeilen 11 bis 15). 


Die Programmzeilen 16 bis 27 stellen die Programmschleife dar, die solange 
durchlaufen wird, bis die Zuordnung der Funktion OR gefunden worden 
ist. Der Befehl ISG X erhöht dabei die Steuerzahl, also die angesprochene 
absolute Adresse, jeweils um eins. Bei der ersten Ausführung von 
RG-BUFX wird das Register mit der absoluten Adresse 192 in den Buffer 
kopiert. Anschließend werden die 7 Bytes des Buffers in das Alphare- 
gister gebracht und durch POSA wird geprüft, ob die gesuchte Zuord- 
nung in dem kopierten Zuordnungsregister enthalten war. Ist dies nicht 
der Fall, wird die Suche mit dem nächsten Zuordnungsregister fortge- 
setzt. 


Wurde die Zuordnung der Funktion OR gefunden, so gibt POSA die Stelle 
an, an der das Byte mit dem Wert 166 im Alpharegister steht. Dies wird 
nun durch das erste Byte der gewünschten synthetischen Zuordnung er- 
setzt (Zeilen 28 bis 30). Anschließend wird das zweite Byte entsprechend 
der eingegebenen synthetischen Zuordnung ersetzt (Zeilen 31 bis 35). 
Danach wird der Inhalt des Alpharegisters in den Buffer kopiert und 
dieser in das ursprüngliche Tastenzuordnungsregister zurückgeladen. 
Anschließend wird der Buffer wieder gelöscht. 


Durch diesen gesamten Vorgang wurde die ursprünglich vorgenommene 
Zuordnung der Funktion OR durch die synthetisch eingegebene Funktion 
ersetzt. 
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= aie Bufferfunktionen nicht normalisieren, kann die Ausführung des 
-—gramms gefahrlos abgebrochen werden; es wird dann lediglich die ge- 
»_-schte synthetische Zuordnung nicht erreicht. Außerdem kann das Pro- 
zamm mit SST in Einzelschritten ausgeführt werden. Obwohl keine Da- 
-srregister benutzt werden, muß mindestens SIZE 001 definiert sein, da- 
-.: der Befehl BUF-RCGX wie beabsichtigt arbeitet. Die durch dieses Pro- 
:’"amm vorgenommenen Bytemanipulationen innerhalb der Zuordnungsregi- 
szer können prinzipiell natürlich auch direkt von der Tastatur aus vor- 
zenommen werden. Durch das am Anfang dieses Kapitels vorgestellte Pro- 
zramm "PB" lassen sich die erzielten Veränderungen kontrollieren. 


"0.5 "KA" - Key Assignment II 
B81+LEL "KA" 


Dieses kürzere und vor allem wesentlich 
82 "OR" 
schnellere Tastenzuordnungsprogramm ar- 83 PASN 
beitet nur dann einwandfrei, wenn in den B4 SIGH 
Zuordnungsregistern keine ungenutzten 85 BSIZE# 
Lücken enthalten sind. Das läßt sich am 86 CL 
87 SIZE? 


einfachsten dadurch erreichen, daß man nur 


PASN (also nicht ASN) benutzt und eine 
gelöschte Zuordnung sofort mit PASN durch 18 RG-BUFX 
eine neue Zuordnung ersetzt. 11 ELnA 
12 7? 
Falls dieses Programm "KA!" verwendet wird, 13 BUF-HR# 
obwohl Lücken in den Zuordnungsregistern 14 CL» 
sind, wird die synthetische Zuordnung einer ı3 Es 
anderen Taste zugewiesen als beabsichtigt 17 Isc L 
war, Auch für dieses Programm gilt, daß 12 CLD 
mindestens SIZE 001 definiert werden muß, 19 X=#9? 
obwohl kein Datenregister benutzt wird. 28 SIGN 
21 x=0?7 
Auch dieses Programm weist der eingege- Sn Ba L 
benen Taste zunächst die Funktion OR zu. >4 yEyy 
Sofern Konflikte mit Giloballabeln oder 25 Y-AX 
anderen Modulen entstehen, kann hier aber 26 ISG *& 
jeder beliebige Befehl aus CAT 2 oder CAT 3 27 CLD 
eingesetzt werden, da die Zuordnungsregi- 28 Rt 
ster später nicht nach diesem Befehl durch- en 
sucht werden, Zur Steigerung der Pro- Er 
er h ; 31 Ft 
grammgeschwindigkeit kann ein Befehl aus 32 A-BUF 
dem Time Modul (z.B. SW) verwandt werden. 2 BUF-RGx 
34 CLST 
Im weiteren Programmverlauf wird das erste 5 BSIZE* 
Tastenzuordnungsregister (absolute Adres- 36 END 
se 192) in den Buffer kopiert und gelangt EN 
von dort in das Alpharegister. En En 


81 BYTES 
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Dann wird das 4. Zeichen (Adresse = 3) des Alpharegisters untersucht. 
Hierbei liegt folgende Überlegung zugrunde: Wird in einem Zuordnungs- 
register die erste Zuordnung vorgenommen, so ist das erste Byte 240, die 
nächsten drei Bytes sind 0 und die nächsten drei Bytes enthalten die 
Zuordnung und den Tastencode. Das Byte mit der Adresse 3 enthält den 
Tastencode der Zuordnung, die als zweite in einem Zuordnungsregister 
vorgenommen wird. Da durch das Programm "KA" eine synthetische Zu- 
ordnung nur im ersten Tastenzuordnungsregister vorgenommen wird, muß 
das Programm nur unterscheiden, ob es sich um die erste oder zweite 
Zuordnung in diesem Register handelt. Dies wird in den Zeilen 15 bis 22 
erreicht. 


Handelte es sich um die erste Zuordnung, ergibt Zeile 22 den Wert 4; 
handelte es sich um die zweite Zuordnung, ergibt Zeile 22 den Wert 1. 
Dies ist jeweils die Adresse innerhalb des Alpharegisters, an der das 
erste Byte synthetisch zu ändern ist. In den Zeilen 23 bis 25 wird diese 
Änderung vorgenommen; in den Zeilen 26 bis 30 wird das zweite Byte 
entsprechend der Eingabe geändert. Diese Manipulationen sind nur auf- 
grund der hervorragenden Alphafunktionen des IL-Development Moduls so 
problemlos möglich. 


Anschließend wird das geänderte Alpharegister in den Buffer kopiert; der 
Inhalt des Buffers wird dann in das erste Tastenzuordnungsregister 
kopiert, und schließlich wird der Buffer wieder gelöscht. 


Die grundlegende Entdeckung, daß ohne Curtain-Versetzung durch die 
Befehle RG-BUFX und BUF-RGX Register außerhalb der Datenregister 
angesprochen werden können, wurde von Michael Markov gemacht. Wie 
viele entscheidende Schritte auf dem Wege zur Verbesserung der 
synthetischen Programmierung, ist auch diese Entdeckung einem 
engagierten Mitglied des PPC zu verdanken, 


Was dem HP-IL Development Modul eigentlich seinen Namen gegeben hat, 
ist seine vorzügliche Fähigkeit, als Hilfsmittel zur Analyse und 
Manipulation des IL-Systems zu dienen. Alle Befehle, die die Kommuni- 
kationsschleife des HP-IL-Systems durchlaufen, können protokolliert und 
- in Einzelschritte aufgeteilt - analysiert werden. Außerdem können in 
Verbindung mit dem IL-System die wichtigsten Einzelbefehle ausgeführt 
werden, Damit ist es z.B. möglich, beliebige Bytes von einer Digital- 
Cassette zu lesen oder beliebige Bytes auf einer Digital-Cassette zu 
verändern. 


1.5 "NEWM?" - Maximale Einträge je Cassette 


-zs Programm "NEWM?" zeigt einen einfachen 
zraktischen Anwendungsfall aus diesem Be- 
-sch. Bevor auf dem Cassettenlaufwerk eine 
-eue Cassette beschrieben werden kann, muß 
-urch NEWM bestimmt werden, wie viele Ein- 
äge maximal auf der Cassette vorgenommen 
"erden sollen. Diese Größendefinition wird 
zwar auf der Cassette aufgezeichnet, läßt 
sich jedoch mit einfachen Mitteln nicht von 
zer Cassette lesen. Man könnte lediglich so 
ange neue Einträge auf die Cassette 
schreiben, bis die Meldung DIR FULL er- 
scheint, um dann die Anzahl der Einträge zu 
zählen. 


Das Programm "NEWM?" liest die Anfangs- 
definition von der Cassette, so daß man 
jederzeit feststellen kann, wie viele Einträge 
maximal möglich sind. Vor und nach Be- 
nutzung des Programms "NEWM?" sollte man 
die Cassette zurückspulen. 


Das Programm bewirkt, daß der zu lesende 
Teil der Cassette in einen der Buffer des 
Cassettenlaufwerks gelesen und dann von 
dort in das Alpharegister des Rechners 
kopiert wird. Anschließend wird aus einem 
bestimmten Byte die Anzahl der möglichen 
Einträge auf der Cassette errechnet. 
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11 FINANZPROGRAMM 


11.1 "F" - Universelles Finanzprogramm 


Das Programm !"F" entstand nach den Anforderungen der Kreditpraxis und 
ist daher besonders vielseitig verwendbar. Alle denkbaren Größen für 
Kredite und Annuitätsdarlehen mit festen oder variablen Konditionen 
können berechnet werden. Ebenso problemlos wird der Effektivzins für 
Ratenkredite mit Pro-Monat-Zins berechnet. Außerdem ist das Programm 
auch zur Sparkontenberechnung einsetzbar, 


Durch die Zuordnung der Eingabe- und Ausgabefunktionen zu den Tasten 
A bis J der oberen zwei Reihen des Rechners und einer zusätzlichen 
Funktionsanzeige wird eine schnelle und sichere Bedienung erreicht. Für 
eine erneute Berechnung ist nur die Eingabe abweichender Werte erfor- 
derlich; dadurch ist eine schnelle Vergleichsrechnung für alternative 
Konditionsgestaltungen möglich. 


Die Zuordnung der Tasten A bis E ist wie bei Finanzprogrammen von HP 
üblich (Finanzmodul). Die Finanzprogramme von HP sind auf die ameri- 
kanischen Verhältnisse zugeschnitten. Wegen der in Deutschland üblichen 
Unterscheidung zwischen Zinssollstellung, Tilgungsverrechnung und Ra- 
tenfälligkeit entsprechen die amerikanischen Programme jedoch nur in 
seltenen Fällen den Anforderungen der deutschen Kreditpraxis. 


Bei der Berechnung ist zu unterscheiden zwischen nominellen und effek- 
tiven Größen. Die nominellen Größen bestimmen eindeutig den Kontoablauf 
über die gesamte Laufzeit. Im nominellen Teil kann für Annuitätsdarlehen 
und Zwischenkredite eine beliebige Größe von 


Laufzeit / Nominalzins / Kapital / Rate / Restschuld 


aus den übrigen Größen berechnet werden. Es müssen also vier dieser 
Größen eingegeben werden, um die fünfte zu errechnen. Dazu ist zusätz- 
lich die Eingabe von 


Zinssollstellung / Tilgungsverrechnung / Ratenfälligkeit 


erforderlich. Eine Berechnung dieser drei Größen ist nicht möglich. 


Die effektiven Größen bestimmen unabhängig von der Art der Kontofüh- 
rung die tatsächlichen Kosten für ein Darlehen. Der zu berechnende 
Effektivzinssatz ist dabei nur abhängig von Laufzeit, Auszahlungsbetrag, 
Rate und Restschuld. Daran ist erkennbar, daß es für den Kreditnehmer 
ohne Bedeutung ist, wie das Kreditinstitut die Buchungen auf dem Kre- 
ditkonto vornimmt. Für ihn sind allein die Zahlungsströme und die Rest- 
schuld maßgeblich. 


71 


'm effektiven Teil kann für Annuitätsdarlehen und Zwischenkredite eine 
»eliebige Größe von 


Laufzeit / Auszahlungsbetrag / Rate / Restschuld / Effektivzinssatz 


Serechnet werden. Dazu ist zusätzlich die Ratenfälligkeit vorzugeben. 


Für Ratenkredite mit Pro-Monat-Zinssatz (sogenannte Laufzeitzinsdariehen) 
ist nur die Berechnung des Effektivzinssatzes möglich; dazu sind 


Laufzeit / Zins / Gebühr 
einzugeben. 


Das Programm "F" kann nur im USER-Modus bedient werden. Den Tasten 
A bis J dürfen keine Funktionen oder Programme zugeordnet sein. Wurde 
das Programm mit den im Anhang enthaltenen Barcodes im USER-Modus 
eingelesen, ist der Programmstart durch zweimaliges Drücken der Taste 
SHIFT aufzurufen, Das Programm enthält zwar einige synthetische Pro- 
grammbefehle, so auch die erste Zeile (LBL "F"), diese sind jedoch zur 
Programmfunktion nicht unbedingt erforderlich und können durch ent- 
sprechende normale Befehle ersetzt werden. Das Programm "F" benötigt 
keinerlei Erweiterungen des Rechners; es kann mit einem HP-41C mit 
einem Memory Modul benutzt werden. Es werden 21 Datenregister benutzt 
(SIZE 021). Zur Protokollierung der Ein- und Ausgabeergebnisse kann ein 
Drucker angeschlossen werden. 


PROGRAMMBEDIENUNG: 


Wird eine Zahl eingegeben und anschließend die zugeordnete Taste 
(A bis J) gedrückt, so wird die eingegebene Zahl gespeichert und mit 
der zugehörigen Abkürzung zur Kontrolle angezeigt. 


Die Eingabereihenfolge ist grundsätzlich beliebig, jede Zahl kann 
beliebig oft korrigiert werden. 


Soll ein Wert abgefragt werden, so ist die Taste RCL und an- 
schließend die zugeordnete Taste (A bis J) zu drücken. Zinssoll- 
stellung, Tilgungsverrechnung und Ratenfälligkeit können durch die 
zugeordneten Tasten (G bis I} ohne RCL abgefragt werden. 


Soll eine Größe berechnet werden, so ist die zugeordnete Taste 
(A bis F oder J) ohne Eingabe zu drücken. Das Programm beginnt 
sofort mit der Berechnung, es müssen daher alle erforderlichen 
Größen vorher eingegeben worden sein. 
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7y 


Taste 


Bezeichnung 


LFZ 


ZINS 
KAP 
RATE 
REST 


AUSZ 
GEB? 


ZSS 
TVR 
RFL 


EFF 


Erklärung 


Laufzeit in Perioden entspre- 
chend der Ratenfälligkeit 
(Taste |) 

Nominalzinssatz 

Kapitalbetrag 

Rate je Fälligkeitstermin 


Restbetrag 


Auszahlungsbetrag 


Gebührensatz in % für Lauf- 
zeitzinsdarlehen 


Zinssollstellungen je Jahr 
Tilgungsverrechnungen je Jahr 
Ratenfälligkeiten je Jahr 


Effektivzins p.a. 


Zur sicheren Bedienung wird empfohlen, eine Tastaturschablone anzu- 


fertigen, 


Berechnungen im Nominalteil werden 


flußt: 


Berechnungen 
flußt: 


LFZ 
ZINS 
KAP 
RATE 


im Effektivteil werden 


LFZ 

RATE 
REST 
AUSZ 


(Taste A) 
(Taste B) 
(Taste C) 
(Taste D) 


(Taste A) 
(Taste D) 
(Taste E) 
(Taste F) 


durch die folgenden Größen beein- 


REST (Taste E) 
- ZSS (Taste G) 
- TVR (Taste H) 
- RFL (Taste |) 


durch die folgenden Größen beein- 


- GEB%® (Taste F) 
- RFL (Taste |) 
- EFF (Taste J) 
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SERECHNUNGSBEISPIEL 


Annuitätsdarlehen ohne Restschuld; 
Berechnung des Effektivzinssatzes 


Konditionen: Zinssatz 9,75%, 
Auszahlung 100 % 
Tilgung: 1% p.a. 
Ratenzahlung: monatlich 
Zinssollstellung: vierteljährlich 
Tilgungsverrechnung: jährlich 

EINGABEN: 

Zins (TASTE B) 9,75 

Kapital (TASTE C) 100 

Rate (TASTE D) 10,75 ENTER 12 / 

Restschuld (TASTEE) 0 

Auszahlungsbetrag (TASTE F) 100 

Zinssollstellung (TASTE GC) 4 

Tilgungsverrechnung (TASTE H) 1 

Ratenfälligkeit (TASTE |) 12 

Laufzeit (TASTE A) - Ergebnis = 351,90 

Effektivzins (TASTE J) - Ergebnis = 10,71 


Zunächst muß die Laufzeit berechnet werden, da diese nicht exakt 
bekannt ist, aber zur Berechnung des Effektivzinssatzes bekannt sein 
muß. Das angezeigte Ergebnis ist die Kreditlaufzeit in Monaten, da als 
Ratenfälligkeit 12 (monatlich) eingegeben wurde. Anschließend ist ohne 
Eingabe die Taste J zu drücken, damit der Effektivzins berechnet wird. 
Wird nach Ablauf des Programms mit R/S gestartet, so erscheint das 
berechnete Ergebnis mit sechs Nachkommastellen. Durch Umschalten in 
den Alpha-Modus kann jederzeit festgestellt werden, welche Größe zuletzt 
berechnet oder eingegeben wurde. Durch das Gleichheitszeichen in der 
Anzeige ist ein Berechnungsergebnis erkennbar. 


Während des Berechnungsvorganges wird jeweils die Bezeichnung des 
Wertes, der berechnet wird, als Laufschrift angezeigt. Dadurch ist eine 
Fehlbedienung sofort zu erkennen; das Programm kann durch R/S 
angehalten werden. 
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Solange das Programm nicht neu gestartet wird, bleiben eingegebene und 
berechnete Werte gespeichert. Nur beim Programmstart vom Anfang des 
Programms werden Zinssollstellung, Tilgungsverrechnung und Raten- 
fälligkeit gleich 1, das Kapital gleich 100 gesetzt. 


Das Berechnungsbeispieil kann daher für eine alternative Konditions- 
gestaltung sofort weitergerechnet werden. Zu berechnen sei der Effektiv- 
zinssatz bei vierteljähriicher Tilgungsverrechnung. Dazu ist über die 
Taste H als Tilgungsverrechnung 4 einzugeben; anschließend ohne 
Eingabe Taste A (veränderte Laufzeit !) und nach der Laufzeitberechnung 
ohne Eingabe die Taste J betätigen. Das Ergebnis ist 10,24 (10,235907). 


Zu beachten ist, daß über die Taste F der Auszahlungsbetrag (also nicht 
der Auszahlungskurs) einzugeben ist. Wegen der vereinfachten Berech- 
nung der Rate und des Auszahlungsbetrages wird empfohlen, grund- 
sätzlich mit einem Kreditbetrag von DM 100,-- zu rechnen. 


Die Rechenzeit kann durch Eingabe eines Schätzwertes entscheidend ver- 
kürzt werden. Grundlage der Berechnung ist zunächst die gespeicherte 
Zahl der zu berechnenden Größe. Je besser dieser Wert dem Ergebnis be- 
reits angenähert ist, desto kürzer ist die Rechenzeit. Stoppt das Pro- 
gramm mit 'DATA ERROR! oder mit 'OUT OF RANGE', so ist eine Berech- 
nung deshalb nicht möglich, weil die vorher gespeicherte Zahl extrem von 
dem zu berechnenden Ergebnis abweicht, oder es liegt ein Eingabefehler 
vor. Kann das Ergebnis nicht geschätzt werden, so ist in jedem Falle eine 
Berechnung möglich, wenn zunächst 0 für die zu berechnende Größe ein- 
gegeben wird. Dies bedingt jedoch immer eine Verlängerung der Rechen- 
zeit. 


Analog zu dem Berechnungsbeispiel können beliebige Größen für 
Darlehen, Zwischenkredite und Kontokorrentkredite berechnet werden. 
Für Zwischenkredite in Darlehensform gilt, daß im Nominalteil die Laufzeit 
aber nicht die genaue Restschuld bekannt ist. 


Bei Berechnung von Agio statt Disagio ist der Auszahlungsbetrag 
entsprechend zu erhöhen. Auch zu Angeboten des Versandhandels kann 
der Effektivzinssatz berechnet werden. Wird z.B. für einen Betrag von 
DM 1.000,-- Ware gekauft, die erst nach sechs Monaten (einschließlich 
einer "Gebühr" von DM 80,--) zu bezahlen ist, so ist zu rechnen: 


Laufzeit (TASTE A) 6 
Rate (TASTE D) 0 
Rest (TASTE E) 1080 
Auszahlung (TASTE F) 1000 
Ratenfälligkeit (TASTE |) 12 


Effektivzins (TASTE J) - Ergebnis = 16,00 
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An dem Beispiel läßt sich erkennen, daß zur Berechnung sowohl Nominal- 
zins als auch Kapital und Zinssollstellung nicht erforderlich sind. Ist die 
"Gebühr" sofort zu zahlen, ergibt sich (Ausz = 920, Rest = 1000) ein 
Effektivzins von 17,39 %. Obwohl für die Berechnung ein (über die 
Taste B eingegebener) Nominalzinssatz eigentlich ohne Bedeutung ist, muß 
doch ein Nominalzins größer als 2 gespeichert sein. Bei der Berechnung 
des Effektivzinssatzes erkennt das Programm aufgrund des Nominalzins- 
satzes, ob es sich um die Berechnung für ein Laufzeitzinsdarlehen 
handelt. Dies sind Ratenkredite mit pro-Monat Zinssätzen. Diese Ver- 
zinsungsart gilt oft für Konsumentenkredite. 


Beispiel: Laufzeit 40 Monate 
Zinssatz 0,6 % pro Monat 
Gebühr 2% 
Eingaben: 
Laufzeit (TASTE A) 40 
Zins (TASTE B) .6 
Gebühr (TASTE FJ) 2 
Effektivzins (TASTE J)) - Ergebnis = 15,20 


An diesem Zahlenbeispiel kann die Rundungsgenauigkeit ähnlicher Pro- 
gramme geprüft werden; das genaue Ergebnis ist 15,204773. Für Laufzeit- 
zinsdarlehen kann nur der Effektivzins berechnet werden. Die Gebühr ist 
in Prozent vom Kreditbetrag einzugeben. Nach der Berechnung ist die 
Gebühr nicht mehr gespeichert; für Vergleichsrechnungen muß sie daher 
neu eingegeben werden. 


Programmgesteuert werden bei der Berechnung für Laufzeitzinsdarlehen 
einige Größen verändert: 


- Auszahlungsbetrag wird auf 100 gesetzt 


- Rate wird auf Durchschnittsrate für 100 gesetzt 
- Ratenfälligkeit wird auf 12 gesetzt 
- Restschuld wird auf 0 gesetzt 


Nach der Berechnung des Effektivzinssatzes für Laufzeitzinsdarlehen ist 
ein direkter Konditionsvergleich mit einem normalen Sollstellungdarlehen 
möglich. 
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Nach der Ergebnisanzeige (EFF = 15,20) ist z.B. einzugeben: 


Zinssollstellung (TASTE GC) 4 
Tilgungsverrechnung (TASTE H) 4 
Nominalzins (TASTE B) - Ergebnis = 13,58 


Ein Sollstellungsdarlehen mit diesen Konditionen entspricht in allen 
Zahlungsströmen genau dem Laufzeitzinsdarlehen. 


Die Größen Laufzeit / Rate / Restschuld beeinflussen sowohl die Berech- 
nung im nominellen als auch im effektiven Teil. Soll eine dieser Größen 
berechnet werden, muß bestimmt werden, ob zur Berechnung nominelle 
oder effektive Größen zugrunde gelegt werden sollen. Dies geschieht 
durch die Art der Eingabe: Wurden vor der Berechnung von Laufzeit / 
Rate / Restschuld sowohl der Auszahlungsbetrag als auch der Effektiv- 
zinssatz eingegeben, wird nach den effektiven Größen gerechnet. Andern- 
falls erfolgt die Berechnung von Laufzeit / Rate / Restschuld aus den 
nominellen Größen. Dabei kommt es nicht nur auf den gespeicherten Wert, 
sondern auf die tatsächliche Eingabe an (wird durch Flag 22 erkannt). 


Beispiel: Zu dem ersten Berechnungsbeispiel (Seite 75) soll der Nominal- 
zinssatz berechnet werden, damit sich ein Effektivzinssatz von 10,50 % 
ergibt. Zunächst ist wieder die Laufzeit zu berechnen, anschließend: 


Auszahlung (TASTE F) 100 
Effektivzins (TASTE J) 10,5 
Rate (TASTE D) - Ergebnis = 0,88 
Nominalzins (TASTE B) - Ergebnis = 9,57 


Der Auszahlungsbetrag mußte hier nochmals eingegeben werden, obwohl 
der gleiche Wert bereits gespeichert war! Da der Nominalzins nicht zu den 
effektiven Größen gehört, mußte zunächst die letzte unbekannte effektive 
Größe, die Rate, berechnet werden, 


Nach der geschilderten Methode ist mit dem Programm "F" jede Art der 
Berechnung nomineller Größen aus gegebenen effektiven Größen möglich. 
Das Programm wird auch für diese Berechnungen nur über die Tasten A 
bis J bedient. 


Einige Beispielrechnungen sollen nun noch die Anwendung des Programms 
zur Berechnung von Sparkonten zeigen. Alle Berechnungen werden nur 
im nominellen Teil durchgeführt, da für Sparkonten nomineli gleich 
effektiv gilt. 
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Da die Bezeichnungen der Eingabegrößen auf Kreditberechnungen abge- 
stellt sind, ist eine gewisse Eingewöhnung erforderlich. Bei der 
Berechnung des Endkapitals mit Ratenzahlungen sollte man sich an dem 
folgenden einfachen Beispiel über die Art der Berechnung Klarheit ver- 
schaffen. Die Anzahl der Raten entspricht der Laufzeit in Verbindung mit 
der Ratenfälligkeit. Dabei kann die letzte Rate eventuell genau zum Ende 
der Laufzeit (also nicht mehr zinswirksam) fällig sein. Die erste Rate wird 
nach der ersten Ratenfälligkeit verrechnet. Soll die erste Rate sofort bei 
Beginn der Laufzeit gezahlt werden, so ist das Anfangskapital um die 
erste Rate zu erhöhen. 


Eingaben: 
Laufzeit (TASTE A) 1 
Zinssatz (TASTE B) 6 
Kapital (TASTE C) 100 
Rate (TASTE D) - 100 Einzahlungen negativ! 


Zinskapitalisierung (TASTE G) 1 
Ratenverrechnung (TASTE H) 1 
Ratenfälligkeit (TASTE I) 1 
Rest (TASTE E) - Ergebnis = 206,00 


Dieses Ergebnis errechnet sich aus dem Anfangskapital von DM 100,--, 
das für genau ein Jahr mit 6 % verzinst wird, zuzüglich der ersten 
Sparrate von DM 100,--, die jedoch nicht mehr zinswirksam ist. Berück- 
sichtigt man diese Berechnungsweise „ läßt sich jede Staffelung eines 
Sparkontos berechnen. Zu beachten ist, daß die Ratenverrechnung 
(TASTE H) immer gleich der Ratenfälligkeit eingegeben werden muß. 


Beispiel für monatliche Sparrate: 


Laufzeit (TASTE A) 48 
Zinssatz (TASTE B) 5 
Kapital (TASTE C) 100 
Rate (TASTE D) - 100 


Zinskapitalisierung (TASTE G) 1 
Ratenverrechnung (TASTE H) 12 
Ratenfälligkeit (TASTE I) 12 
Rest (TASTE E) - Ergebnis = 5412,23 
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Sollten 48 Monatsraten mit sofortigem Zahlungsbeginn berechnet werden, 
ist von dem errechneten Ergebnis die letzte Rate abzuziehen. Diese 
Modellrechnung weicht jedoch von einer tatsächlichen Sparkontostaffelung 
geringfügig ab. Zunächst werden Pfennigbeträge nicht verzinst; außerdem 
müßten alle Zahlungen exakt termingerecht, beginnend vor Anfang der 
Zinsperiode (also am 31. Dezember des Vorjahres) gezahlt werden. Im 
übrigen gehen alle Modellrechnungen davon aus, daß der Zinssatz unver- 
ändert bleibt. 


Auch die Effektivverzinsung von Prämien- oder Bonussparkonten läßt sich 
berechnen. Wird z.B. nach vier Jahren Verzinsung mit 5 % ein Bonus von 
10 % gezahlt, ergibt sich folgende Berechnung: 


Laufzeit (TASTE A) 4 
Zinssatz (TASTE B) 5 
Kapital (TASTE C) 1000 
Rate (TASTE D) 0 


Zinskapitalisierung (TASTE G) 1 
Ratenverrechnung (TASTE H) 1 
Ratenfälligkeit (TASTE I) 1 
Rest (TASTEE) - Ergebnis 


1215,51 


Zu diesem Kontostand am Ende der Laufzeit muß der Bonus addiert 
werden; das Ergebnis ist der neue "Rest", aus dem der neue Zins er- 
rechnet wird: 


Rest (TASTE E) 100 + 
Zins (TASTE B) - Ergebnis = 7,10 


Der Bonus von 10 % erhöht den Effektivzins also nicht um 2,5 % (10 $% 
verteilt auf vier Jahre), da er erst am Ende der Laufzeit gezahlt wird. 


Das Programm "F" enthält einige synthetische Befehle, um ein Optimum an 
Schnelligkeit zu erreichen und um einige Bytes einzusparen, damit das 
Programm auf zwei Magnetkarten gespeichert werden kann, 


Für LBL "F", einschließlich der Zuordnung zur Taste SHIFT/SHIFT, sind 
mit dem Load-Bytes-Programm folgende Eingaben erforderlich: 
192, 0, 242, 11, 70. 


Um den CAT 1 zu berichtigen, muß anschließend mit GTO .. der Pro- 
grammspeicher gepackt werden. Dann ist aber die Tastenzuordnung noch 
nicht wirksam! 


81 


Um die Tastenzuordnung zu aktivieren, muß das Programm im USER- 
Modus in einen externen Speicher gebracht werden. Hierzu kann der 
erweiterte Speicher des X-Functions Moduls, der Kartenleser oder das 
Cassettenlaufwerk benutzt werden. Dann ist das Programm im Haupt- 
speicher zu löschen und anschließend, wiederum im USER-Modus, aus dem 
externen Speicher wieder in den Programmspeicher zurückzuladen. Jetzt 
ist die synthetisch erzeugte Zuordnung zur Taste SHIFT/SHIFT wirksam. 


Die in dem Programm enthaltenen Kurzform-Exponenten E, Ei, E2 können 
durch die entsprechenden normalen Eingaben ersetzt werden, 


In den Programmzeilen 81, 85 und 92 sind synthetische Sprungbefehle 
enthalten, die aus dem Programmausdruck nicht erkannt werden können, 
Diese sind erforderlich, da die Sprungweite bis zu dem entsprechenden 
Label in dem normalen Befehl nicht gespeichert werden könnte. Mit dem 
Load-Bytes-Programm ist hier jeweils einzugeben: 208, 0, 3; sollen keine 
synthetischen Befehle verwandt werden, so ist LBL 03 durch LBL 15 zu 
ersetzen, alle zugehörigen Sprungbefehle müssen dann von GTO 03 in 
GTO 15 geändert werden. 


Zur Erzeugung der Laufschrift wurden in Zeile 94 bis 97 die synthe- 
tischen Befehle RCL d und STO d verwandt, da der Zustand von Flag 21 
nicht verändert werden darf, falls ein Drucker angeschlossen ist. 
Als Ersatz können foigende Befehle eingegeben werden: 


SF 25, CF 21, AVIEW, SF 99, FS? 55, SF 21. 


Um das Programm trotz der vielseitigen Anforderungen so kurz wie 
möglich zu gestalten, wurde auf eine besondere Formatierung der 
Druckausgabe verzichtet. Wird kein Drucker angeschlossen und ein guter 
Schätzwert vorgeben, liegt die Rechenzeit bei etwa zwanzig Sekunden. 


Die Anwendungsmöglichkeiten des Programms "F" gehen wesentlich über 
das hinaus, was in den Beispielrechnungen gezeigt wurde. So sind z.B. 
auch Aufzinsungs- und Abzinsungsrechnungen problemlos möglich. Auch 
Barwerte zu Ratenforderungen (z.B. Rentenkapitalisierungen) können 
berechnet werden. 
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Gerhard Kruse 


Optimales Programmieren mit dem HP-41 


Dieses Buch stellt Methoden der fortschrittlichen Programmierung des HP-41 
vor. Eswerden 51 vollständige Programme und Routinen in Funktion, Aufbau 
und Anwendung dargestellt. Anhand allgemein verständlicher Programme 
werden die verschiedenen Techniken zur Programmoptimierung aufgezeigt. 


Besonders die: intensive Nutzung des X-Functions Moduls und der synthe- 
tischen Programmierung werden an vielen Programmbeispielen ausführlich 
erläutert. 


Die ‘Grundlagen der synthetischen Programmierung, "Load Bytes’ und 
“Key Assignment’’ werden als besonders kurze Programme vorgestellt. 
Anwendungen und sinnvoller Nutzen synthetischer Programmierung werden 
an einfachen und komplexen Programmbeispielen schrittweise verständlich 
gemacht. 


Mit den Programmbeschreibungen bietet das Buch dem Benutzer des HP-41 
eine Fülle wertvoller Anregungen, um die Möglichkeiten seines Taschen- 
computers optimal zu nutzen. 
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